anchor.diff:      case fast_agi_socket:send(C,["SAY ALPHA ",integer_to_list(Number)," ",
   				 Escape,"\n"]) of
   	{ok,"-1"} ->
  -	    error;
  +	    {error,error_or_hangup};
  +	{ok,"0"} ->
  +	    {ok,no_key};
   	{ok,_Key}=Res ->
  -	    Res
  +	    Res;
  +	Error ->
  +	    Error
       end.
   
   %% @spec say_date(C,Date,Escape) -> Result
   %%    C      = Connection
   %%    Date   = integer
   %%    Escape = string
  -%%    Result = what
  -%%
  -%% @doc Says the given date. The Date is given as a UNIX time, i.e. number of secunds since 00:00:00 on January 1, 1970.
  -%% @end
  -say_date(C,Date,Escape) ->
  +%%    Result = {ok,Key} | {error,Reason}
  +%%
  +%% @doc Says the given date. The Date is given as a UNIX time, i.e. number of secunds since 00:00:00 on January 1, 1970, UTC.
  +%% @end
  +say_date(C,Date,Escape) when is_integer(Date) ->
       case fast_agi_socket:send(C,["SAY DATE ",integer_to_list(Date)," ",
   				 Escape,"\n"]) of
   	{ok,"-1"} ->
  -	    error;
  +	    {error,error_or_hangup};
  +	{ok,"0"} ->
  +	    {ok,no_key};
   	{ok,_Key}=Res ->
  -	    Res
  +	    Res;
  +	Error ->
  +	    Error
       end.
   
   %% @spec say_datetime(C,Datetime,Escape) -> Result
   %%    C      = Connection
   %%    Datetime= integer
   %%    Escape = string
  -%%    Result = what
  +%%    Result = {ok,Key} | {error,Reason}
   %%
   %% @doc Says the given datetime. The Datetime is given as a UNIX time, i.e. 
  -%%      number of secunds since 00:00:00 on January 1, 1970.
  -%% @end
  -say_datetime(C,Datetime,Escape) ->
  +%%      number of secunds since 00:00:00 on January 1, 1970, UTC.
  +%% @end
  +say_datetime(C,Datetime,Escape) when is_integer(Datetime) ->
       case fast_agi_socket:send(C,["SAY DATETIME ",integer_to_list(Datetime)," ",
   				 Escape,"\n"]) of
   	{ok,"-1"} ->
  -	    error;
  +	    {error,error_or_hangup};
  +	{ok,"0"} ->
  +	    {ok,no_key};
   	{ok,_Key}=Res ->
  -	    Res
  +	    Res;
  +	Error ->
  +	    Error
       end.
   
   %% @spec say_digits(C,Number,Escape) -> Result
   %%    C      = Connection
   %%    Number = integer
   %%    Escape = string
  -%%    Result = what
  +%%    Result = {ok,Key} | {error,Reason}
   %%
   %% @doc Say digits.
   %% @end
  
positive.code: %%    C      = Connection
  %%    Family = string
  %%    Key    = string
  %%    Result = Success | Failure
  %%    Success= 1
  %%    Failure= 0
  %%
  %% @doc Delete the entry from the Asterisk DB given by Family and Key.
  %% @end
  
negative.code: %% @spec stream_file(C,File) -> Result
  %%    C      = Connection
  %%    File   = string
  %%    Result = {ok,timeout} | {ok,Key,EndPos} | {error,Reason}
  %%
  %% @doc Play audio file indicated by File.
  %% @end
  