anchor.diff:  %% Tests
   %%
   
  -edoc_example_has_docs_from_debug_info(C) ->
  -    module_has_docs_from_debug_info(C, edoc_example).
  +edoc_example(C) ->
  +    simple_lookup(C, edoc_example).
   
  -edoc_example_has_docs_from_source(C) ->
  -    module_has_docs_from_source(C, edoc_example).
  +proplists(C) ->
  +    simple_lookup(C, proplists).
   
  -recon_has_docs_from_debug_info(C) ->
  -    module_has_docs_from_debug_info(C, recon).
  -
  -recon_has_docs_from_source(C) ->
  -    module_has_docs_from_source(C, recon).
  -
  -simple_lookup_should_just_work(_) ->
  -    {ok, Beam} = docsh_lib:get_docs(proplists),
  -    Doc = docsh_format:lookup(Beam, proplists, [moduledoc]),
  -    ct:pal("doc: ~p", [Doc]),
  -    ?assertMatch({ok, _}, Doc).
  +recon(C) ->
  +    simple_lookup(C, recon).
   
   simple_lookup_should_not_work_if_no_doc_is_available(_) ->
       {ok, Beam} = docsh_lib:get_docs(lists),
  
positive.code: 
  -include_lib("common_test/include/ct.hrl").
  -include_lib("eunit/include/eunit.hrl").
  
  -define(TESTED, example).
  
  -define(eq(Expected, Actual), ?assertEqual(Expected, Actual)).
  
  all() ->
      [
  
negative.code:     [{docs_v1, [], tests()}].
  
  tests() ->
      [
       edoc_example,
       proplists,
       recon,
       simple_lookup_should_not_work_if_no_doc_is_available
      ].
  
  init_per_suite(Config) ->
      Config.
  
  end_per_suite(Config) -> Config.
  