Changeset cb06a43 for perlwrap.pm

Timestamp:

Mar 15, 2007, 2:14:52 PM (17 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:

37dd88c

Parents:

69d66aa7

git-author:

Nelson Elhage <nelhage@mit.edu> (03/15/07 14:08:21)

git-committer:

Nelson Elhage <nelhage@mit.edu> (03/15/07 14:14:52)

Message:

Strengthening the personal/private distinction slightly, and only
boldifying personal messages.

File:

• perlwrap.pm (modified) (3 diffs)

perlwrap.pm

@@ -243 +243 @@
 use base qw( BarnOwl::Message );
 
-# all loopback messages are personal
-sub is_personal {
+# all loopback messages are private
+sub is_private {
   return 1;
 }
@@ -255 +255 @@
 use base qw( BarnOwl::Message );
 
-# all non-loginout AIM messages are personal for now...
-sub is_personal {
+# all non-loginout AIM messages are private for now...
+sub is_private {
     return !(shift->is_loginout);
 }
@@ -600 +600 @@
     $header .= "(" . $sender . ")";
     my $message = $header . "\n". indentBody($m);
-    if($m->is_private && $m->direction eq "in") {
+    if($m->is_personal && $m->direction eq "in") {
         $message = BarnOwl::Style::boldify($message);
     }