anchor.diff:      case file:make_dir(Path) of
           ok ->
               F("rsa"), F("dsa"),
  -            ?info("please edit authorized_keys", [])
  +            ?warn("please edit authorized_keys", [])
       end,
       Path.
   
  
positive.code: 
  start(_Type, _Args) ->
      {ok, SupPid} = magicbeam_sup:start_link(),
      {ok, SupPid, case magicbeam_util:appenv(ssh, true) of
                       false -> #state{};
                       true -> start_ssh()
                   end}.
  
negative.code:     case {F("authorized_keys"), F("ssh_host_dsa_key"), F("ssh_host_rsa_key")} of
          {true, true, true} ->
              Path;
  	{false, true, true} ->
  	    ?warn("missing file ~s", [Path ++ "authorized_keys"]),
  	    Path;
          {A, B, C} ->
              ?error("missing magicbeam ssh files in path ~p authorized_keys:~p ssh_host_dsa_key:~p ssh_host_rsa_key:~p", [Path, A, B, C]),
              undefined
      end.
  