Changeset 84db778 for perl/lib

Timestamp:

Jul 28, 2009, 11:15:43 PM (15 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

d77e909

Parents:

57ba9f1

git-author:

Nelson Elhage <nelhage@mit.edu> (07/28/09 00:21:20)

git-committer:

Nelson Elhage <nelhage@mit.edu> (07/28/09 23:15:43)

Message:

'subscribe' doesn't actually understand -r

Arguably it should, but until it does, tab-completion probably shouldn't
lie.

File:

• perl/lib/BarnOwl/Complete/Zephyr.pm (modified) (2 diffs)

perl/lib/BarnOwl/Complete/Zephyr.pm

@@ -30 +30 @@
 }
 
-sub complete_sub {
-    my $ctx = shift;
-    return complete_flags($ctx,
-        [],
-        {
-            "-r" => \&complete_realm,
-        });
-}
-
 sub on_message {
     my $m = shift;
@@ -50 +41 @@
 BarnOwl::Completion::register_completer(zcrypt    => \&complete_zwrite);
 
-# TODO: Handle aliases transparently in the core completion code?
-BarnOwl::Completion::register_completer(sub       => \&complete_sub);
-BarnOwl::Completion::register_completer(subscribe => \&complete_sub);
-
 $BarnOwl::Hooks::newMessage->add("BarnOwl::Complete::Zephyr::on_message");