Changeset b73ce70 for perl/modules


Ignore:
Timestamp:
Jan 24, 2009, 9:17:30 PM (15 years ago)
Author:
Alex Vandiver <alexmv@mit.edu>
Branches:
master, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
ce56149
Parents:
e8c6d8f
Message:
Only show confusing "ignoring:<random xml>" if jabber:spew is turned on
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm

    rbc7037c rb73ce70  
    11241124sub process_presence_subscribed {
    11251125    my ( $sid, $p ) = @_;
    1126     queue_admin_msg("ignoring:".$p->GetXML());
     1126    queue_admin_msg("ignoring:".$p->GetXML()) if BarnOwl::getvar('jabber:spew') eq 'on';
    11271127    # RFC 3921 says we should respond to this with a "subscribe"
    11281128    # but this causes a flood of sub/sub'd presence packets with
     
    11341134sub process_presence_unsubscribed {
    11351135    my ( $sid, $p ) = @_;
    1136     queue_admin_msg("ignoring:".$p->GetXML());
     1136    queue_admin_msg("ignoring:".$p->GetXML()) if BarnOwl::getvar('jabber:spew') eq 'on';
    11371137    # RFC 3921 says we should respond to this with a "subscribe"
    11381138    # but this causes a flood of unsub/unsub'd presence packets with
Note: See TracChangeset for help on using the changeset viewer.