view release on metacpan or  search on metacpan

lib/Asterisk/AMI/Common.pm  view on Meta::CPAN

use strict;
use warnings;
use parent qw(Asterisk::AMI);

use version 0.77; our $VERSION = version->declare("v0.2.8");

sub new {
        my ($class, %options) = @_;

        return $class->SUPER::new(%options);
}

sub attended_transfer {

        my ($self, $channel, $exten, $context, $timeout) = @_;

        return $self->simple_action({   Action  => 'Atxfer',
                                        Channel => $channel,
                                        Exten   => $exten,
                                        Context => $context,

lib/Asterisk/AMI/Common/Dev.pm  view on Meta::CPAN

use strict;
use warnings;
use parent qw(Asterisk::AMI::Common);

use version 0.77; our $VERSION = version->declare("v0.2.8");

sub new {
	my ($class, %options) = @_;

	return $class->SUPER::new(%options);
}

1;