Changeset 4fde21c for perl/lib

Timestamp:

Jul 29, 2009, 10:05:51 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:

f907cf0

Parents:

747d6a5

git-author:

Nelson Elhage <nelhage@mit.edu> (07/29/09 21:43:35)

git-committer:

Nelson Elhage <nelhage@mit.edu> (07/29/09 22:05:51)

Message:

Completion: complete filter names

File:

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

perl/lib/BarnOwl/Complete/Client.pm

@@ -21 +21 @@
 sub complete_color { return @all_colors; }
 
+sub complete_filter_args {
+    my $ctx = shift;
+    my $arg = shift;
+    return if $arg;
+    return @{BarnOwl::all_filters()};
+}
+
 sub complete_help {
     my $ctx = shift;
@@ -39 +46 @@
            "-b" => \&complete_color,
         },
-        undef # TODO: make this get list of filters for the first argument
-              # then maybe some magic like completing keywords instance and other shiny
+         \&complete_filter_args
         );
 }