From c5468b4a598afa09d8e4c0d8e46ab44cca1e9c60 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem@fripost.org>
Date: Wed, 9 Mar 2016 15:04:20 +0100
Subject: pullimap: purge old messages every 12h.

---
 pullimap   | 2 +-
 pullimap.1 | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/pullimap b/pullimap
index c16d6ac..351b4f3 100755
--- a/pullimap
+++ b/pullimap
@@ -236,7 +236,7 @@ sub purge() {
 
     unless ($days == 0) {
         my $now = time;
-        return if defined $LAST_PURGED and $now - $LAST_PURGED < 6*3600; # purge every 6h
+        return if defined $LAST_PURGED and $now - $LAST_PURGED < 43200; # purge every 12h
         $LAST_PURGED = $now;
 
         my @now = gmtime($now - $days*86400);
diff --git a/pullimap.1 b/pullimap.1
index 57a4adf..d4ef502 100644
--- a/pullimap.1
+++ b/pullimap.1
@@ -116,7 +116,7 @@ criterion ignoring time and timezone.)
 If \fIpurge\-after\fR is set to \(lq0\(rq then messages are deleted
 immediately after delivery.  Otherwise \fBPullIMAP\fR issues an IMAP
 SEARCH command to list old messages; if \fB\-\-idle\fR is set then the
-SEARCH command is issued again every 6 hours.
+SEARCH command is issued again every 12 hours.
 
 .TP
 .I type
-- 
cgit v1.2.3