anchor.diff:    case find_all_by_name(Name) of
       [H|_Rest] -> H;
       [] -> not_found;
  -    % This should ALWAYS be not_found, but just to be safe
  +    %% This should ALWAYS be not_found, but just to be safe
       E -> E
     end.
   
  
positive.code:     [N] -> App#app{name = generate_unique_name(N, 5)};
      [A,B] -> App#app{name = generate_unique_name(A, 5), branch = B}
    end.
    
  %%-------------------------------------------------------------------
  %% @spec (Name) ->    {ok, Value}
  %% @doc Generate a unique name based on a given name
  
negative.code: -include ("beehive.hrl").
  -include ("common.hrl").
  
  %% DATABASE STUFF
  -export ([
            create/1,
            read/1,
            save/1,
            update/2,
            delete/1,
            find_by_name/1,
            find_all_by_name/1,
            exist/1,
            all/0
           ]).
  
  -export ([
            new/1,
            update_by_name/1,
            restart_by_name/1,
            expand_by_name/1
           ]).
  
  %% APPLICATION STUFF
  -export ([
            to_proplist/1,
            build_app_env/2
           ]).
  
  -define (DB, beehive_db_srv).
  
  