Changeset 6c144b3

Timestamp:

Aug 29, 2009, 10:17:09 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:

94ef58c

Parents:

a4dd3a5

git-author:

David Benjamin <davidben@mit.edu> (08/21/09 21:03:17)

git-committer:

Nelson Elhage <nelhage@mit.edu> (08/29/09 22:17:09)

Message:

Fix $argct when given -- in complete_flags

$argct is updated in the loop, but the loop is prematurely exited when
it finds --.

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

File:

• perl/lib/BarnOwl/Completion/Util.pm (modified) (2 diffs)

perl/lib/BarnOwl/Completion/Util.pm

@@ -29 +29 @@
             if($word eq '--') {
                 $optsdone = 1;
+                $idx++;
                 last;
             }
@@ -40 +41 @@
         $idx++;
     }
+    # Account for any words we skipped
+    $argct += $ctx->word - $idx;
 
     if($flag) {