Changeset 744769e for perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
- Timestamp:
- Aug 20, 2009, 2:46:38 AM (15 years ago)
- Branches:
- master, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
- Children:
- 0b4aef2
- Parents:
- 0b5168d
- git-author:
- Anders Kaseorg <andersk@mit.edu> (08/20/09 02:18:17)
- git-committer:
- Anders Kaseorg <andersk@mit.edu> (08/20/09 02:46:38)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
rab9cd8f r744769e 387 387 process_msg($conn, $to, join(" ", @_)); 388 388 } else { 389 BarnOwl::start_edit_win( "/msg -a " . $conn->alias . " $to", sub {process_msg($conn, $to, @_)});389 BarnOwl::start_edit_win(BarnOwl::quote('/msg', '-a', $conn->alias, $to), sub {process_msg($conn, $to, @_)}); 390 390 } 391 391 return; … … 414 414 is_private($to) ? 415 415 (isprivate => 'true') : (channel => $to), 416 replycmd => "irc-msg -a " . $conn->alias . " $to",417 replysendercmd => "irc-msg -a " . $conn->alias . " $to"416 replycmd => BarnOwl::quote('irc-msg', '-a', $conn->alias, $to), 417 replysendercmd => BarnOwl::quote('irc-msg', '-a', $conn->alias, $to), 418 418 ); 419 419 BarnOwl::queue_message($msg);
Note: See TracChangeset
for help on using the changeset viewer.