Changeset cb06a43 for perlwrap.pm


Ignore:
Timestamp:
Mar 15, 2007, 2:14:52 PM (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:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • perlwrap.pm

    rbb2c60d rcb06a43  
    243243use base qw( BarnOwl::Message );
    244244
    245 # all loopback messages are personal
    246 sub is_personal {
     245# all loopback messages are private
     246sub is_private {
    247247  return 1;
    248248}
     
    255255use base qw( BarnOwl::Message );
    256256
    257 # all non-loginout AIM messages are personal for now...
    258 sub is_personal {
     257# all non-loginout AIM messages are private for now...
     258sub is_private {
    259259    return !(shift->is_loginout);
    260260}
     
    600600    $header .= "(" . $sender . ")";
    601601    my $message = $header . "\n". indentBody($m);
    602     if($m->is_private && $m->direction eq "in") {
     602    if($m->is_personal && $m->direction eq "in") {
    603603        $message = BarnOwl::Style::boldify($message);
    604604    }
Note: See TracChangeset for help on using the changeset viewer.