Changeset 3ec8d9a


Ignore:
Timestamp:
Jan 30, 2007, 11:06:13 PM (17 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
e78397d
Parents:
e363375
git-author:
Nelson Elhage <nelhage@mit.edu> (01/30/07 23:06:05)
git-committer:
Nelson Elhage <nelhage@mit.edu> (01/30/07 23:06:13)
Message:
Default to using a user's full JID as their nick in MUCs.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/jabber.pl

    rc18f08d r3ec8d9a  
    717717      or die("Usage: jmuc join MUC [-p password] [-a account]");
    718718
     719    $muc = Net::Jabber::JID->new($muc);
     720    $jid = Net::Jabber::JID->new($jid);
     721    $muc->SetResource($jid->GetJID('full')) unless length $muc->GetResource();
     722
    719723    $conn->getConnectionFromJID($jid)->MUCJoin(JID      => $muc,
    720724                                                  Password => $password,
Note: See TracChangeset for help on using the changeset viewer.