anchor.diff:  %% For unit tests only
   start() ->
       gen_server:start({local, ?SERVER}, ?MODULE, [], []).
  -
  -get_routes() ->
  -    gen_server:call(?SERVER, get_routes, infinity).
  -
   
   add_remove_route_test() ->
       application:set_env(webmachine, dispatch_list, []),
  
positive.code: remove_resource(Resource) when is_atom(Resource) ->
      gen_server:call(?SERVER, {remove_resource, Resource}, infinity).
  
  %% @spec start_link() -> {ok, pid()} | {error, any()}
  %% @doc Starts the webmachine_router gen_server.
  start_link() ->
  
negative.code: -export([start_link/0,
           add_route/1,
           remove_route/1,
           remove_resource/1,
           get_routes/0]).
  
  %% gen_server callbacks
  -export([init/1,
  