anchor.diff:  %%
   cmd_atom_to_function(CmdAtom) ->
     case lists:keysearch(CmdAtom, 1, cmd_atom_map()) of
  -	  {value, {_, Module, Function}} -> {Module, Function};
  +	  {value, {_, Module, Function, _HelpFunction}} -> {Module, Function};
  +	  false -> unknown_cmd
  +  end.
  +
  +%%
  +%% Translate command atom to command module and help function
  +%%
  +cmd_atom_to_help_function(CmdAtom) ->
  +  case lists:keysearch(CmdAtom, 1, cmd_atom_map()) of
  +	  {value, {_, Module, _Function, HelpFunction}} -> {Module, HelpFunction};
   	  false -> unknown_cmd
     end.
   
  
positive.code: 
  % Connect to another node
  ui_connect(Params) ->
    io:format("ui_connect Params: ~p~n", [Params]),
    case check_num_params(Params, 1) of
      low ->
        io:format("Enter node-name or local~n");
  
negative.code: 
  ui_hosts_help() ->
    io:format("Display the contents of the /etc/hosts file~n").
  
  ui_exit_help() ->
     io:format("Exit the UI~n").
  
  ui_help_help() ->
    io:format("Display the contents of the help screen").
    
    
  %%
  %% Check the number of parameters in the param list
  