anchor.diff:  
   setup() ->
       application:load(lager),
  -    application:set_env(lager, handlers, [{lager_test_backend, [info]}]),
  +    application:set_env(lager, handlers, [{?MODULE, [info]}]),
       application:start(lager).
   
   cleanup(_) ->
  
positive.code:                         ok
                  end
              },
              {"test logging with arguments works",
                  fun() ->
                          lager:warning("test message ~p", [self()]),
                          ?assertEqual(1, count()),
  
negative.code:                         ok
                  end
              },
              {"logging works from a nested list comprehension",
                  fun() ->
                          ?assertEqual(0, count()),
                          [ [lager:warning("test message") || N <- lists:seq(1, 10)] ||
  