aboutsummaryrefslogtreecommitdiffstats
path: root/interimap
diff options
context:
space:
mode:
authorGuilhem Moulin <guilhem@fripost.org>2016-03-13 00:01:27 +0100
committerGuilhem Moulin <guilhem@fripost.org>2016-03-13 00:01:27 +0100
commitd5fbcc37f0298bc05cab29b38b115e3fcd08738d (patch)
tree2718f977fa0659812319ff61371215749a4c278b /interimap
parenta42dd0bd6ebcb2335895d0526653d4f21b7b8ff3 (diff)
interimap: Fix watch value when --watch is not set.
Diffstat (limited to 'interimap')
-rwxr-xr-xinterimap2
1 files changed, 1 insertions, 1 deletions
diff --git a/interimap b/interimap
index d331183..17d28c2 100755
--- a/interimap
+++ b/interimap
@@ -64,7 +64,7 @@ my $COMMAND = do {
usage(1) if defined $COMMAND and (($COMMAND eq 'delete' and !@ARGV) or ($COMMAND eq 'rename' and $#ARGV != 1));
usage(1) if defined $COMMAND and (defined $CONFIG{watch} or defined $CONFIG{notify});
usage(1) if $CONFIG{target} and !(defined $COMMAND and ($COMMAND eq 'delete'or $COMMAND eq 'rename'));
-$CONFIG{watch} = $CONFIG{notify} ? 900 : 60 unless $CONFIG{watch};
+$CONFIG{watch} = $CONFIG{notify} ? 900 : 60 if (defined $CONFIG{watch} or $CONFIG{notify}) and !$CONFIG{watch};
@ARGV = map {uc $_ eq 'INBOX' ? 'INBOX' : $_ } @ARGV; # INBOX is case-insensitive
die "Invalid mailbox name $_" foreach grep !/\A([\x01-\x7F]+)\z/, @ARGV;