diff options
| -rwxr-xr-x | interimap | 4 | ||||
| -rw-r--r-- | interimap.service | 1 | ||||
| -rw-r--r-- | pullimap@.service | 3 |
3 files changed, 5 insertions, 3 deletions
@@ -68,7 +68,7 @@ usage(1) if defined $COMMAND and (defined $CONFIG{watch} or defined $CONFIG{noti usage(1) if $CONFIG{target} and !(defined $COMMAND and ($COMMAND eq 'delete' or $COMMAND eq 'rename')); $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; +die "Invalid mailbox name $_" foreach grep !/\A[\x01-\x7F]+\z/, @ARGV; my $CONF = do { @@ -564,7 +564,7 @@ my $STH_LASTUIDs_LOCAL = $DBH->prepare(q{SELECT lUID FROM mapping WHERE idx = ? my $STH_LASTUIDs_REMOTE = $DBH->prepare(q{SELECT rUID FROM mapping WHERE idx = ? ORDER BY rUID DESC LIMIT 1024}); -# Download some missing UIDs from $source; returns the thew allocated UIDs +# Download some missing UIDs from $source; returns the new allocated UIDs sub download_missing($$$@) { my $idx = shift; my $mailbox = shift; diff --git a/interimap.service b/interimap.service index 8e9915f..6d7fa45 100644 --- a/interimap.service +++ b/interimap.service @@ -1,5 +1,6 @@ [Unit] Description=Fast bidirectional synchronization for QRESYNC-capable IMAP servers +Documentation=man:interimap(1) Wants=network-online.target After=network-online.target diff --git a/pullimap@.service b/pullimap@.service index d066886..53694da 100644 --- a/pullimap@.service +++ b/pullimap@.service @@ -1,5 +1,6 @@ [Unit] -Description=Pull mails from an IMAP mailbox and deliver them to a SMTP session +Description=Pull mails from an IMAP mailbox and deliver them to a SMTP session (instance %i) +Documentation=man:pullimap(1) Wants=network-online.target After=network-online.target |