From 0efe290298e900a0066ca193cbb958f39542e394 Mon Sep 17 00:00:00 2001
From: Matthias Andree <matthias.andree@gmx.de>
Date: Fri, 11 Jan 2008 10:24:31 +0000
Subject: Undocumented and untested hack: setting FETCHMAIL_POP3_FORCE_RETR in
 the environment forces fetchmail to use RETR instead of TOP for POP3.

svn path=/branches/BRANCH_6-3/; revision=5151
---
 pop3.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'pop3.c')

diff --git a/pop3.c b/pop3.c
index 9b101f03..84dbc69c 100644
--- a/pop3.c
+++ b/pop3.c
@@ -329,6 +329,12 @@ static int pop3_getauth(int sock, struct query *ctl, char *greeting)
 
     /* Set this up before authentication quits early. */
     set_peek_capable(ctl);
+
+    /* Hack: allow user to force RETR. */
+    if (peek_capable && getenv("FETCHMAIL_POP3_FORCE_RETR")) {
+	peek_capable = 0;
+    }
+
     /*
      * The "Maillennium POP3/PROXY server" deliberately truncates
      * TOP replies after c. 64 or 80 kByte (we have varying reports), so
-- 
cgit v1.2.3