Changeset 30e7ffd for perl/lib/BarnOwl

Timestamp:

Jun 18, 2009, 6:30:39 PM (15 years ago)

Author:

Alex Dehnert <adehnert@mit.edu>

Branches:

master, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

94af438

Parents:

5550eb0

Message:

Don't zcrypt shift-R replies to zcrypted messages

In particular, if we've set $sender to force a
recipient, and the original message was not
private, then we won't use zcrypt.

File:

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

perl/lib/BarnOwl/Message/Zephyr.pm

@@ -179 +179 @@
 
     my $cmd;
-    if(lc $self->opcode eq 'crypt') {
+    if(lc $self->opcode eq 'crypt' and ( not $sender or $self->is_private)) {
+        # Responses to zcrypted messages should be zcrypted, so long as we
+        # aren't switching to personals
         $cmd = 'zcrypt';
     } else {