[1191] in BarnOwl Developers
[D-O-H] r1130 - trunk/owl/perl/modules/Jabber/lib/BarnOwl/Module
daemon@ATHENA.MIT.EDU (asedeno@MIT.EDU)
Thu Oct 29 18:13:56 2009
Resent-From: nelhage@mit.edu
Resent-To: barnowl-dev-mtg@charon.mit.edu
X-Original-To: nelhage@nelhage.com
To: dirty-owl-hackers@mit.edu
From: asedeno@MIT.EDU
Reply-to: dirty-owl-hackers@MIT.EDU
Date: Wed, 24 Sep 2008 10:01:30 -0400 (EDT)
Author: asedeno
Date: 2008-09-24 10:01:30 -0400 (Wed, 24 Sep 2008)
New Revision: 1130
Modified:
trunk/owl/perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm
Log:
Squelch chat messages with no body tag. e.g. typing notifications, etc.
Modified: trunk/owl/perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm
===================================================================
--- trunk/owl/perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm 2008-09-18 22:51:15 UTC (rev 1129)
+++ trunk/owl/perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm 2008-09-24 14:01:30 UTC (rev 1130)
@@ -966,8 +966,10 @@
sub process_incoming_chat_message {
my ( $sid, $j ) = @_;
- BarnOwl::queue_message( j2o( $j, { direction => 'in',
- sid => $sid } ) );
+ if ($j->DefinedBody()) {
+ BarnOwl::queue_message( j2o( $j, { direction => 'in',
+ sid => $sid } ) );
+ }
}
sub process_incoming_error_message {
