Changeset 94ef58c for perl/lib/BarnOwl/Completion
- Timestamp:
- Aug 29, 2009, 10:17:09 PM (15 years ago)
- Branches:
- master, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
- Children:
- 4ccd92c
- Parents:
- 6c144b3
- git-author:
- David Benjamin <davidben@mit.edu> (08/21/09 21:12:52)
- git-committer:
- Nelson Elhage <nelhage@mit.edu> (08/29/09 22:17:09)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/lib/BarnOwl/Completion/Util.pm
r6c144b3 r94ef58c 15 15 my $default = shift; 16 16 17 my %options = (); 18 %options = @_ if @_; 17 19 18 20 my $idx = 1; … … 38 40 } else { 39 41 $argct++; 42 if ($options{stop_at_nonflag}) { 43 $optsdone = 1; 44 $idx++; 45 last; 46 } 40 47 } 41 48 $idx++;
Note: See TracChangeset
for help on using the changeset viewer.