anchor.diff:  
   c() ->
       {ok, F} = file:open("mime.types", [read]),
  -    io:format("Compiling mime.types ... ~n", []),
  +    io:format("Compiling mime.types ... > mime_types.erl ~n", []),
       T = ets:new(aa, [set, public]),
       c(F, T, io:get_line(F, '')).
   
  
positive.code: 			      ets:insert(T, {up(E), MimeType})
  		      end, Exts)
  	    end
      end,
      c(F, T, io:get_line(F, '')).
  
  
negative.code: c(F, T, Line) ->
      case Line of
  	[$#|_] ->
  	    ignore;
  	[$\s|_ ] ->
  	    ignore;
  	L ->
  	    case string:tokens(L, [$\s, $\t]) of
  		[] ->
  		    ignore;
  		[_] ->  
  		    ignore;
  		[MimeType | Exts] ->
  		    lists:foreach(
  		      fun(E) ->
  