Changeset 6c144b3 for perl/lib


Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/lib/BarnOwl/Completion/Util.pm

    r4fbc7f5 r6c144b3  
    2929            if($word eq '--') {
    3030                $optsdone = 1;
     31                $idx++;
    3132                last;
    3233            }
     
    4041        $idx++;
    4142    }
     43    # Account for any words we skipped
     44    $argct += $ctx->word - $idx;
    4245
    4346    if($flag) {
Note: See TracChangeset for help on using the changeset viewer.