Changeset bacf674 for perl

Timestamp:

May 18, 2010, 11:34:28 AM (14 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, release-1.10, release-1.7, release-1.8, release-1.9

Children:

ebfcc87

Parents:

8d16e58

git-author:

Nelson Elhage <nelhage@mit.edu> (05/18/10 11:20:37)

git-committer:

Nelson Elhage <nelhage@mit.edu> (05/18/10 11:34:28)

Message:

Jabber: Fix completion of MUC names.

Properly store the MUC name, instead of the stringified JID object.

File:

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

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

@@ -680 +680 @@
                                                    MaxChars => 0
                                                   });
-    $completion_jids{$muc} = 1;
+    $completion_jids{$muc->GetJID('base')} = 1;
     return;
 }