Changeset 33539f7


Ignore:
Timestamp:
May 30, 2009, 6:26:49 PM (12 years ago)
Author:
Alex Dehnert <adehnert@mit.edu>
Branches:
master, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
6223638
Parents:
3043064
git-author:
Alex Dehnert <adehnert@mit.edu> (05/28/09 04:00:01)
git-committer:
Alex Dehnert <adehnert@mit.edu> (05/30/09 18:26:49)
Message:
Display context for pings
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlwrap.pm

    rf0f919d r33539f7  
    10201020    my $self = shift;
    10211021    my $m = shift;
    1022     return "\@b(PING) from \@b(" . $m->pretty_sender . ")";
     1022    my $personal_context = $m->personal_context;
     1023    $personal_context = ' [' . $personal_context . ']' if $personal_context;
     1024    return "\@b(PING)" . $personal_context . " from \@b(" . $m->pretty_sender . ")";
    10231025}
    10241026
Note: See TracChangeset for help on using the changeset viewer.