[442] in BarnOwl Developers
[D-O-H] r572 - trunk/owl/perl/modules
daemon@ATHENA.MIT.EDU (asedeno@MIT.EDU)
Thu Oct 29 18:06:13 2009
Resent-From: nelhage@mit.edu
Resent-To: barnowl-dev-mtg@charon.mit.edu
To: dirty-owl-hackers@mit.edu
From: asedeno@MIT.EDU
Reply-to: dirty-owl-hackers@MIT.EDU
Date: Fri, 26 Jan 2007 17:42:10 -0500 (EST)
Author: asedeno
Date: 2007-01-26 17:42:07 -0500 (Fri, 26 Jan 2007)
New Revision: 572
Modified:
trunk/owl/perl/modules/jabber.pl
Log:
Properly register keybindings. Testing? What? :p
Modified: trunk/owl/perl/modules/jabber.pl
===================================================================
--- trunk/owl/perl/modules/jabber.pl 2007-01-26 22:03:10 UTC (rev 571)
+++ trunk/owl/perl/modules/jabber.pl 2007-01-26 22:42:07 UTC (rev 572)
@@ -216,7 +216,7 @@
sub onStart {
if ( *BarnOwl::queue_message{CODE} ) {
register_owl_commands();
- register_keys unless $BarnOwl::reload;
+ register_keybindings() unless $BarnOwl::reload;
push @::onMainLoop, sub { BarnOwl::Jabber::onMainLoop(@_) };
push @::onGetBuddyList, sub { BarnOwl::Jabber::onGetBuddyList(@_) };
$vars{show} = '';
@@ -420,7 +420,7 @@
}
sub register_keybindings {
- BarnOwl::bindkey("recv j command jwrite");
+ BarnOwl::bindkey("recv j command start-command jwrite ");
}
sub cmd_login {
