Changeset 42947f1 for perlwrap.pm

Timestamp:

Jun 1, 2007, 4:01:55 AM (17 years ago)

Author:

Alex Vandiver <alexmv@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:

f1fc47f

Parents:

8757122

git-author:

Alex Vandiver <alexmv@mit.edu> (06/01/07 04:01:29)

git-committer:

Alex Vandiver <alexmv@mit.edu> (06/01/07 04:01:55)

Message:

 * Outgoing messages now log as much information as incomign messages
 * Code reuse is a Good Thing

File:

• perlwrap.pm (modified) (1 diff)

perlwrap.pm

@@ -572 +572 @@
     $sender =~ s/\n.*$//s;
     $header .= " " x (4 - ((length $header) % 4));
-    $header .= "(" . $sender . ")";
+    $header .= "(" . $sender . '@color[default]' . ")";
     my $message = $header . "\n". indentBody($m);
     if($m->is_personal && $m->direction eq "in") {