Changeset 5738650 for perl/lib/BarnOwl
- Timestamp:
- Feb 22, 2011, 11:09:32 PM (14 years ago)
- Branches:
- master, release-1.10, release-1.8, release-1.9
- Children:
- 60d7935
- Parents:
- 8a97586
- git-author:
- Adam Glasgall <adam@crossproduct.net> (02/10/11 20:47:32)
- git-committer:
- Nelson Elhage <nelhage@nelhage.com> (02/22/11 23:09:32)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/lib/BarnOwl/Style/Default.pm
r08544e0 r5738650 97 97 $header = ucfirst $m->type . $personal_context . " sent to " . $m->pretty_recipient; 98 98 } else { 99 $header = ucfirst $m->type . $personal_context . " from " . $m->pretty_sender; 99 $header = ucfirst $m->type . $personal_context . " from "; 100 if(defined($m->auth) && ($m->auth ne "YES")) { 101 $header .= "UNAUTH: "; 102 } 103 $header .= maybe($m->pretty_sender); 100 104 } 101 105 } else { … … 104 108 $header .= ' / ' . $self->humanize($m->subcontext, 1); 105 109 } 106 $header .= ' / @b{' . maybe($m->pretty_sender) . '}'; 110 $header .= ' / '; 111 if(defined($m->auth) && ($m->auth ne "YES")) { 112 $header .= "UNAUTH: "; 113 } 114 $header .= '@b{' . maybe($m->pretty_sender) . '}'; 107 115 } 108 116
Note: See TracChangeset
for help on using the changeset viewer.