anchor.diff:                          ok
                   end
               },
  -            {"test logging works from a begin/end block inside a list comprehension",
  +            {"logging works from a begin/end block inside a list comprehension",
                   fun() ->
                           ?assertEqual(0, count()),
                           [ begin lager:warning("test message") end || N <- lists:seq(1, 10)],
  
positive.code:                         ok
                  end
              },
              {"test logging works from inside a list comprehension",
                  fun() ->
                          ?assertEqual(0, count()),
                          [lager:warning("test message") || N <- lists:seq(1, 10)],
  
negative.code: -ifdef(TEST).
  
  pop() ->
      gen_event:call(lager_event, ?MODULE, pop).
  
  count() ->
      gen_event:call(lager_event, ?MODULE, count).
  
  count_ignored() ->
      gen_event:call(lager_event, ?MODULE, count_ignored).
  
  lager_test_() ->
      {foreach,
  