anchor.diff:          _                 -> "message"
       end.
   
  -% A Code is an number which is module-specific.
  -%
  +%% A Code is an number which is module-specific.
  +%%
   -spec log(atom(), integer(), string()) -> ok.
   log(Module, Code, Msg) ->
       log(Module, Code, Msg, []).
  
positive.code:         warn -> warn;
          crit -> crit;
          _ -> info % Anything unknown is info (this includes {'EXIT', Reason})
          end.
  
  -spec code_string(atom(), integer()) -> string().
  code_string(Module, Code) ->
  
negative.code:     [E || E <- gen_server:call(?MODULE, recent),
            E#log_entry.module =:= Module ].
  
  %% Example categorization -- pretty much exists for the test below, but
  %% this is what any module that logs should look like.
  ns_log_cat(1) ->
      crit;
  ns_log_cat(2) ->
  