anchor.diff:      end.
   
   
  -format_flow1([Xml={Tag,Args,Data}|T], Box1, PDF) ->
  +format_flow1([Xml={Tag,_Args,_Data}|T], Box1, PDF) ->
       %% io:format("Flow Chunk:~n~p~n into box:~n~p~n", [Xml, Box1]),
       CurrentObj = get_tag_schema(atom_to_list(Tag), Box1#box.objs),
       TagMap = CurrentObj#obj.tags,
  
positive.code: %% Description: Handling cast messages
  %%--------------------------------------------------------------------
  
  handle_cast({format_string, String, Root, To}, State) ->
    Serialised = convert_xml_to_pdf(String, Root),
    To ! Serialised;
    
  handle_cast({format, File, To}, State) ->
    Out = filename:rootname(File) ++ ".pdf",
    case file:read_file(File) of
  	{ok, Bin} ->
  
negative.code: 
  parse_paraIndent(S) ->
      case string:tokens(S, ",") of
  	[H|L] ->
  	    map(fun(I) -> parse_int("paraIndent",  I) end, [H|L]);
  	_ ->
  	    io:format("paraIndent must be of the form <int>,<int>, was:~s",
  		      [S]),
  