Changeset 0449730 for perlwrap.pm


Ignore:
Timestamp:
Feb 16, 2007, 1:45:39 AM (14 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, barnowl_perlaim, debian, 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:
1 edited

Legend:

Unmodified
Added
Removed
  • perlwrap.pm

    r6e6ded7 r0449730  
    572572
    573573    $header .= "  " . time_hhmm($m);
    574     $header .= "\t(" . $m->long_sender . ")";
     574    my $sender = $m->long_sender;
     575    $sender =~ s/\n.*$//s;
     576    $header .= "\t(" . $sender . ")";
    575577    my $message = $header . "\n". indentBody($m);
    576578    if($m->is_private && $m->direction eq "in") {
Note: See TracChangeset for help on using the changeset viewer.