Changeset 0449730

Timestamp:

Feb 16, 2007, 1:45:39 AM (18 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

e3cc184

Parents:

6e6ded7

git-author:

Nelson Elhage <nelhage@mit.edu> (02/16/07 01:45:32)

git-committer:

Nelson Elhage <nelhage@mit.edu> (02/16/07 01:45:39)

Message:

Only show the first line of zsigs

File:

• perlwrap.pm (modified) (1 diff)

perlwrap.pm

@@ -572 +572 @@
 
     $header .= "  " . time_hhmm($m);
-    $header .= "\t(" . $m->long_sender . ")";
+    my $sender = $m->long_sender;
+    $sender =~ s/\n.*$//s;
+    $header .= "\t(" . $sender . ")";
     my $message = $header . "\n". indentBody($m);
     if($m->is_private && $m->direction eq "in") {