anchor.diff:      Text = xmerl:export_simple([XML], xmerl_html, []),
       edoc_lib:write_file(Text, Dir, ?INDEX_FILE).
   
  -modules_frame(Dir, Ms, Title, CSS) ->
  +modules_frame(Dir, Ms, Title, CSS, Options) ->
  +    Suffix = proplists:get_value(file_suffix, Options, ?DEFAULT_FILE_SUFFIX),
       Body = [?NL,
   	    {h2, [{class, "indextitle"}], ["Modules"]},
   	    ?NL,
  
positive.code: 	     lists:append(
  	       [[?NL,
  		 {tr, [{td, [],
  			[{a, [{href, module_ref(M)},
  			      {target, "overviewFrame"},
  			      {class, "module"}],
  			  [atom_to_list(M)]}]}]}]
  
negative.code:     Text = xmerl:export_simple([XML], xmerl_html, []),
      edoc_lib:write_file(Text, Dir, ?MODULES_FRAME).
  
  module_ref(M, Suffix) ->
      atom_to_list(M) ++ Suffix.
  
  xhtml(Title, CSS, Content) ->
      xhtml_1(Title, CSS, {body, [{bgcolor, "white"}], Content}).
  