Changeset 7940ac2 for perl/lib/BarnOwl

Timestamp:

Aug 1, 2009, 9:23:04 PM (15 years ago)

Author:

David Benjamin <davidben@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:

bc5e856

Parents:

28cf94b

git-author:

David Benjamin <davidben@mit.edu> (08/01/09 21:20:54)

git-committer:

David Benjamin <davidben@mit.edu> (08/01/09 21:23:04)

Message:

Simplify complete_help and make correct

Don't use complete_flags for complete_help. It doesn't need it.

Signed-off-by: David Benjamin <davidben@mit.edu>

File:

• perl/lib/BarnOwl/Complete/Client.pm (modified) (1 diff)

perl/lib/BarnOwl/Complete/Client.pm

@@ -54 +54 @@
 sub complete_help {
     my $ctx = shift;
-    return complete_flags($ctx,
-        [qw()],
-        {
-        },
-        \&complete_command
-       );
+    if($ctx->word == 1) {
+        return complete_command();
+    }
 }