From: keiichi <keiichi>
Date: Mon, 9 Aug 1999 23:45:18 +0000 (+0000)
Subject: (gnus-ofsetup-read-pop-account): Add prefix "po:" to POP spool name.
X-Git-Tag: nana-gnus-6_13_4b5-~2
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=fd946daacd23653941ede2af612ab691757b47bf;p=elisp%2Fgnus.git-

(gnus-ofsetup-read-pop-account): Add prefix "po:" to POP spool name.
---

diff --git a/lisp/gnus-ofsetup.el b/lisp/gnus-ofsetup.el
index dc8fe05..bcdb47c 100644
--- a/lisp/gnus-ofsetup.el
+++ b/lisp/gnus-ofsetup.el
@@ -61,7 +61,7 @@
       (let ((auth (gnus-ofsetup-completing-read-symbol 
 		   "Authentification Method"
 		   'pass 'apop)))
-	(list (concat account "@" server) :auth-scheme auth)))))
+	(list (concat "po:" account "@" server) :auth-scheme auth)))))
 
 (defun gnus-setup-for-offline ()
   "*Set up Gnus for offline environment."