anchor.diff:               [ begin
                      meck:new(Mod),
                      meck:expect(Mod, ping, fun() -> pong end)
  -               end || Mod <- ?CHECK_MODS ]
  +               end || Mod <- ?CHECK_MODS ],
  +             meck:new(chef_keygen_cache),
  +             meck:expect(chef_keygen_cache, status, fun() -> ?KEYGEN_STATUS end)
        end,
        fun(_) ->
                [ meck:unload(Mod) || Mod <- ?CHECK_MODS ],
  +             meck:unload(chef_keygen_cache),
                cleanup_env()
        end,
        [
  
positive.code:                      meck:expect(BadMod, ping, fun() -> pang end);
                   timeout ->
                       meck:expect(BadMod, ping, fun() -> timer:sleep(?SLOW_CHECK_SLEEP) end)
               end
       end,
       fun(_) ->
               [ meck:unload(Mod) || Mod <- ?CHECK_MODS ],
               cleanup_env()
       end,
       [{"handles failure of " ++ a2s(BadMod),
  
negative.code:     {setup,
       fun() ->
               setup_env(),
               application:set_env(chef_wm, health_ping_modules, [bad_module_no_exist]),
               meck:new(chef_keygen_cache),
               meck:expect(chef_keygen_cache, status, fun() -> ?KEYGEN_STATUS end)
  
       end,
       fun(_) ->
               cleanup_env(),
               meck:unload(chef_keygen_cache)
       end,
       [
        fun() ->
  