Changeset 176c22b for perl/lib/BarnOwl

Timestamp:

Nov 14, 2012, 3:45:50 PM (11 years ago)

Author:

David Benjamin <davidben@mit.edu>

Children:

472dcbe

Parents:

c42a8d1

git-author:

David Benjamin <davidben@mit.edu> (11/14/12 15:22:41)

git-committer:

David Benjamin <davidben@mit.edu> (11/14/12 15:45:50)

Message:

Fix display of pseudologins

After b9517cf7ce2959a6e86a52d25a98b1d03df56d58, they lost fields and
auth keys. They're faked, so they don't really have fields or auth, but
put them in anyway to appease existing styles.

Reported-By: Kevin Chen <kchen@mit.edu>

File:

• perl/lib/BarnOwl/Message/Zephyr.pm (modified) (2 diffs)

perl/lib/BarnOwl/Message/Zephyr.pm

@@ -51 +51 @@
     my ($m) = @_;
     return undef if (!$m->is_loginout);
+    return undef if (!defined($m->fields));
     return $m->fields->[2];
 }
@@ -57 +58 @@
     my ($m) = @_;
     return undef if (!$m->is_loginout);
+    return undef if (!defined($m->fields));
     return $m->fields->[0];
 }