Changeset 7be5d8b

Timestamp:

Jul 27, 2009, 11:23:57 PM (14 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

f987504

Parents:

82a6e8b

git-author:

Nelson Elhage <nelhage@mit.edu> (07/27/09 23:15:17)

git-committer:

Nelson Elhage <nelhage@mit.edu> (07/27/09 23:23:57)

Message:

Completion::Context: Fix behavior if point is at end after whitespace.

We should add an empty word on the end, and need to get the word limits
correct.

Files:

• perl/lib/BarnOwl/Completion/Context.pm (modified) (1 diff)
• t/completion.t (modified) (1 diff)

perl/lib/BarnOwl/Completion/Context.pm

@@ -136 +136 @@
     unless(defined($word_point)) {
         $word_point = 0;
-        $cword_start = $cword_end = 0;
+        $cword_start = $cword_end = $point;
+        push @words, '' if $point > 0;
     }
 

t/completion.t

@@ -98 +98 @@
               2, 0, 9, 11);
 
+test_tokenize(q{zwrite -c }, q{},
+              [qw(zwrite -c), ''],
+              2, 0, 10, 10);
+
 # It's not entirely clear what we should do here. Make a test for the
 # current behavior, so we'll notice if it changes.