Changeset 0eb4036 for perl/modules/Jabber

Timestamp:

Sep 24, 2008, 10:01:30 AM (16 years ago)

Author:

Alejandro R. Sedeño <asedeno@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:

dfbb131

Parents:

451db9e

Message:

Squelch chat messages with no body tag. e.g. typing notifications, etc.

File:

• perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm (modified) (1 diff)

perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm

@@ -967 +967 @@
 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 } ) );
+    }
 }