Changes in perl/lib/BarnOwl/Style/Default.pm [5738650:ebc6f77]

File:

• perl/lib/BarnOwl/Style/Default.pm (modified) (2 diffs)

perl/lib/BarnOwl/Style/Default.pm

@@ -113 +113 @@
         }
         $header .= '@b{' . maybe($m->pretty_sender) . '}';
+        if (defined($m->realm) && $m->realm ne BarnOwl::zephyr_getrealm()) {
+            $header .= ' {' . $self->humanize($m->realm, 1) . '}';
+        }
     }
 
@@ -126 +129 @@
     my $self = shift;
     my $m = shift;
-    my $sender = $m->long_sender;
-    $sender =~ s/\n.*$//s;
+    my $sender = $self->humanize($m->long_sender, 1);
     if (BarnOwl::getvar('colorztext') eq 'on') {
       return "  (" . $sender . '@color[default]' . ")";