Changeset bf70350 for perl/lib/BarnOwl/Message/Zephyr.pm

Timestamp:

Jan 23, 2012, 6:41:05 PM (12 years ago)

Author:

Anders Kaseorg <andersk@mit.edu>

Branches:

master, release-1.10, release-1.9

Children:

bff1f22

Parents:

d126a19

git-author:

Anders Kaseorg <andersk@mit.edu> (10/13/11 03:03:07)

git-committer:

Anders Kaseorg <andersk@mit.edu> (01/23/12 18:41:05)

Message:

Stop pretending to support zwrite *

‘*’ is not a valid recipient, and pretending that it is just adds more
special cases to get wrong.

Signed-off-by: Anders Kaseorg <andersk@mit.edu>
Reviewed-by: David Benjamin <davidben@mit.edu>

File:

• perl/lib/BarnOwl/Message/Zephyr.pm (modified) (1 diff)

perl/lib/BarnOwl/Message/Zephyr.pm

@@ -171 +171 @@
         $class = $self->class;
         $instance = $self->instance;
-        if ($self->recipient eq '*' || $self->recipient eq '') {
-            $to = '';
-        } elsif ($self->recipient =~ /^@/) {
+        if ($self->recipient eq '' || $self->recipient =~ /^@/) {
             $to = $self->recipient;
         } else {