Changeset 461e905 for perl

Timestamp:

Aug 20, 2009, 2:46:45 AM (15 years ago)

Author:

Anders Kaseorg <andersk@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:

7011c3dc

Parents:

0b4aef2

git-author:

Anders Kaseorg <andersk@mit.edu> (08/20/09 02:16:38)

git-committer:

Anders Kaseorg <andersk@mit.edu> (08/20/09 02:46:45)

Message:

BarnOwl::Completion: Use multi-argument quote.

Signed-off-by: Anders Kaseorg <andersk@mit.edu>

File:

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

perl/lib/BarnOwl/Completion.pm

@@ -66 +66 @@
 sub show_completions {
     my @words = @_;
-    my $all = join(" ", map {BarnOwl::quote($_)} @words);
+    my $all = BarnOwl::quote(@words);
     my $width = BarnOwl::getnumcols();
     if (length($all) > $width-1) {