Changeset 2b66c361 for perl/lib/BarnOwl/Hooks.pm

Timestamp:

Dec 21, 2009, 5:14:11 PM (15 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

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

Children:

fa0114b

Parents:

cce5dbd

git-author:

Alejandro R. Sedeño <asedeno@mit.edu> (12/20/09 18:56:46)

git-committer:

Nelson Elhage <nelhage@mit.edu> (12/21/09 17:14:11)

Message:

Eliminate newlines between parts of the buddylists.

[nelhage@mit.edu: _get_blist: Force exactly one newline between components]

File:

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

perl/lib/BarnOwl/Hooks.pm

@@ -184 +184 @@
 
 sub _get_blist {
-    return join("\n", $getBuddyList->run);
+    my @results = $getBuddyList->run;
+    s/^\s+|\s+$// for (@results);
+    return join("\n", @results);
 }