And ah, a change in splitresult,
from
$val = $2 if ($2);
to
$val = $2 if (defined $2);
...to get e.g. Status: 0 to Status => 0 instead of Status => ''
/F
Fredrik Liljegren wrote:
> Hello list.
>
> I'm new on this list. I'm working with asterisk at a call center
> company and recently started using asterisk perl to get better control.
>
> I've been using Asterisk::AGI for a while, but just started using
> Asterisk::Manager yesterday, and it seems quite in the rough.
>
> I added a few comments, documentation and debugging-output (if you set
> $astman->debug(1)).
>
> Then, AMI sends a lot of messages, and I found that the answer to
> sendcommand often was a completely different message. I added ActionID
> to all in sendcommand, and check that the correct response is returned.
> Other responses are sent to eventcallback.
>
> Well, here's a diff, I hope it's useful.
>
> /Fredrik (fiddur on #asterisk)
>
>
> ------------------------------------------------------------------------
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: asterisk-perl-unsubscr...@lists.gnuinter.net
> For additional commands, e-mail: asterisk-perl-h...@lists.gnuinter.net
