anchor.diff:  		   true  -> string:substr(Page, Prefix_length + 1);
   		   false -> Page
   	       end,
  -    format_link({wikiLink, LinkName}, Page, Root, show).
  +    wiki_link(LinkName, Page, Root).
   
   
   get_filesize(File) ->
  
positive.code:      "</a></td><td align=left valign=top>",
       Description, "</td></tr>\n"].
  
  %% Same as format_link, but drop the prefix
  %% This is used to create the Wiki menu
  format_menu_link(Prefix, Page, Root) ->
  
negative.code:     pp(Wik, LinkFun, Page).
  
  format_link(Page, Root) ->
      format_link({wikiLink, Page}, [], Root, show).
  
  
  %% TODO: Refactor that: The use of the page is ugly:
  %% Most of the time the Page is in the second parameter,
  %% but in the wikiLink it is the second element of the first parameter tuple
  format_link({wikiLink, Page}, _, Root, _Mode) ->
      %% MR: I first need to extract the code here into a separate function:
      wiki_link(Page, Page, Root);
  format_link({editTag, Tag}, Page, Root, show) ->
      ["<a href=\"editTag.yaws?node=",Page,"&tag=",i2s(Tag),"\">",
       "<img border=0 src='WikiPreferences.files/edit.gif'></a> "];
  