Changeset 8362a48 for perl/modules


Ignore:
Timestamp:
Sep 7, 2009, 8:53:28 PM (12 years ago)
Author:
Anders Kaseorg <andersk@mit.edu>
Branches:
master, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
3519d06
Parents:
636de2a
git-author:
Anders Kaseorg <andersk@mit.edu> (09/07/09 20:53:13)
git-committer:
Anders Kaseorg <andersk@mit.edu> (09/07/09 20:53:28)
Message:
BarnOwl::Module::Jabber: Quote jroster auth, deauth commands.

Signed-off-by: Anders Kaseorg <andersk@mit.edu>
File:
1 edited

Legend:

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

    r0b4aef2 r8362a48  
    11181118    $props{body} = "Allow user ($from) to subscribe to your ($to) presence?\n" .
    11191119                   "(Answer with the `yes' or `no' commands)";
    1120     $props{yescommand} = "jroster auth $from -a $to";
    1121     $props{nocommand} = "jroster deauth $from -a $to";
     1120    $props{yescommand} = BarnOwl::quote('jroster', 'auth', $from, '-a', $to);
     1121    $props{nocommand} = BarnOwl::quote('jroster', 'deauth', $from, '-a', $to);
    11221122    $props{question} = "true";
    11231123    BarnOwl::queue_message(BarnOwl::Message->new(%props));
Note: See TracChangeset for help on using the changeset viewer.