anchor.diff:  	case ?DICT:is_key(AtomCommand, State#state.processes) of
   		false -> Reply = nil;
   		true ->
  -			[Port, Pid] = ?DICT:fetch(AtomCommand, State#state.processes),
  -			?TRACE("Port", [Port]),
  -			Reply = Pid
  +			[_, Port] = ?DICT:fetch(AtomCommand, State#state.processes),
  +			Reply = erlang:port_command(Port, collect)
   	end,
   	{reply, Reply, State};
   handle_call(_Request, _From, State) ->
  
positive.code: %% API
  -export([start_link/0]).
  -export ([run_command/1, run_command/2, check_command/1]).
  -export ([collect_output/2]).
  
  %% gen_server callbacks
  -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]).
  
negative.code: %% Description: Initiates the server
  %%--------------------------------------------------------------------
  init([]) ->
  	% process_flag(trap_exit, true),
    {ok, #state{
  		processes = ?DICT:new()
  	}}.
  