anchor.diff:  %%
   %% %CopyrightBegin%
   %% 
  -%% Copyright Ericsson AB 1997-2012. All Rights Reserved.
  +%% Copyright Ericsson AB 1997-2013. All Rights Reserved.
   %% 
   %% The contents of this file are subject to the Erlang Public License,
   %% Version 1.1, (the "License"); you may not use this file except in
  
positive.code:     %%
      %% FIXME: The colours should *really* be set with
      %% stylesheets...
      Encoding = encoding(File),
      Header = ["<!DOCTYPE HTML PUBLIC "
  	      "\"-//W3C//DTD HTML 3.2 Final//EN\">\n"
  	      "<!-- autogenerated by '"++atom_to_list(?MODULE)++"'. -->\n"
  	      "<html>\n"
                "<head>\n"
                "<meta http-equiv=\"Content-Type\" content=\"text/html;"
                   "charset=",
                Encoding,"\"/>\n"
                "<title>", File, "</title>\n"
                "</head>\n\n"
  	      "<body bgcolor=\"white\" text=\"black\""
  	      " link=\"blue\" vlink=\"purple\" alink=\"red\">\n"],
  
negative.code: 
  %%%-----------------------------------------------------------------
  %%% Add a link target for each line and one for each function definition.
  build_html(SFd,DFd,Encoding,Functions) ->
      build_html(SFd,DFd,Encoding,file:read_line(SFd),1,Functions,false).
  
  build_html(SFd,DFd,Encoding,{ok,Str},L,[{F,A,L}|Functions],_IsFuncDef) ->
      FALink = http_uri:encode(F++"-"++integer_to_list(A)),
      file:write(DFd,["<a name=\"",to_raw_list(FALink,Encoding),"\"/>"]),
      build_html(SFd,DFd,Encoding,{ok,Str},L,Functions,true);
  build_html(SFd,DFd,Encoding,{ok,Str},L,[{clause,L}|Functions],_IsFuncDef) ->
      build_html(SFd,DFd,Encoding,{ok,Str},L,Functions,true);
  build_html(SFd,DFd,Encoding,{ok,Str},L,Functions,IsFuncDef) ->
      LStr = line_number(L),
      Str1 = line(Str,IsFuncDef),
      file:write(DFd,[LStr,Str1]),
      build_html(SFd,DFd,Encoding,file:read_line(SFd),L+1,Functions,false);
  build_html(_SFd,_DFd,_Encoding,eof,L,_Functions,_IsFuncDef) ->
      L.
  
  line_number(L) ->
  