view release on metacpan or  search on metacpan

lib/Jabber/NS.pm  view on Meta::CPAN

use constant NS_DELAY      => 'jabber:x:delay';
use constant NS_XOOB       => 'jabber:x:oob';
use constant NS_EVENT      => 'jabber:x:event';
use constant NS_SIGNED     => 'jabber:x:signed';
use constant NS_ENCRYPTED  => 'jabber:x:encrypted';
use constant NS_ENVELOPE   => 'jabber:x:envelope';
use constant NS_EXPIRE     => 'jabber:x:expire';

# misc
use constant NS_VCARD      => 'vcard-temp';
use constant NS_XHTML      => 'http://www.w3.org/1999/xhtml';

use constant IQ_GET        => 'get';
use constant IQ_SET        => 'set';
use constant IQ_ERROR      => 'error';
use constant IQ_RESULT     => 'result';

# flags
use constant r_HANDLED     => '!jabber-connection-handled!';

lib/Jabber/NS.pm  view on Meta::CPAN

@ISA=qw(Exporter);

%EXPORT_TAGS = (
  'stream' => [qw(NS_CLIENT NS_SERVER NS_ACCEPT)],
  'iq'     => [qw(NS_AUTH NS_REGISTER NS_ROSTER NS_AGENT
                  NS_AGENTS NS_VERSION NS_TIME NS_PRIVATE
                  NS_SEARCH NS_OOB NS_ADMIN NS_FILTER NS_AUTH_0K 
                  NS_BROWSE NS_CONFERENCE NS_GATEWAY NS_LAST NS_RPC)],
  'x'      => [qw(NS_OFFLINE NS_DELAY NS_XOOB NS_EVENT
                  NS_SIGNED NS_ENCRYPTED NS_ENVELOPE NS_EXPIRE)],
  'misc'   => [qw(NS_VCARD NS_XHTML IQ_GET IQ_SET IQ_ERROR IQ_RESULT)],
  'flags'  => [qw(r_HANDLED)],
);

my $con;
push @EXPORT_OK, @$con while (undef, $con) = each %EXPORT_TAGS;


$EXPORT_TAGS{'all'} = \@EXPORT_OK;

=head1 SEE ALSO