Mercurial > emacs
comparison lisp/gnus/pop3.el @ 59996:aac0a33f5772
Change release version from 21.4 to 22.1 throughout.
Change development version from 21.3.50 to 22.0.50.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 09 Feb 2005 15:50:47 +0000 |
parents | 9bdd97960431 |
children | 88db2adda4b7 3ebd9bdb4fe5 |
comparison
equal
deleted
inserted
replaced
59995:8f4938738427 | 59996:aac0a33f5772 |
---|---|
44 | 44 |
45 (defcustom pop3-maildrop (or (user-login-name) | 45 (defcustom pop3-maildrop (or (user-login-name) |
46 (getenv "LOGNAME") | 46 (getenv "LOGNAME") |
47 (getenv "USER")) | 47 (getenv "USER")) |
48 "*POP3 maildrop." | 48 "*POP3 maildrop." |
49 :version "21.4" ;; Oort Gnus | 49 :version "22.1" ;; Oort Gnus |
50 :type 'string | 50 :type 'string |
51 :group 'pop3) | 51 :group 'pop3) |
52 | 52 |
53 (defcustom pop3-mailhost (or (getenv "MAILHOST") ;; nil -> mismatch | 53 (defcustom pop3-mailhost (or (getenv "MAILHOST") ;; nil -> mismatch |
54 "pop3") | 54 "pop3") |
55 "*POP3 mailhost." | 55 "*POP3 mailhost." |
56 :version "21.4" ;; Oort Gnus | 56 :version "22.1" ;; Oort Gnus |
57 :type 'string | 57 :type 'string |
58 :group 'pop3) | 58 :group 'pop3) |
59 | 59 |
60 (defcustom pop3-port 110 | 60 (defcustom pop3-port 110 |
61 "*POP3 port." | 61 "*POP3 port." |
62 :version "21.4" ;; Oort Gnus | 62 :version "22.1" ;; Oort Gnus |
63 :type 'number | 63 :type 'number |
64 :group 'pop3) | 64 :group 'pop3) |
65 | 65 |
66 (defcustom pop3-password-required t | 66 (defcustom pop3-password-required t |
67 "*Non-nil if a password is required when connecting to POP server." | 67 "*Non-nil if a password is required when connecting to POP server." |
68 :version "21.4" ;; Oort Gnus | 68 :version "22.1" ;; Oort Gnus |
69 :type 'boolean | 69 :type 'boolean |
70 :group 'pop3) | 70 :group 'pop3) |
71 | 71 |
72 ;; Should this be customizable? | 72 ;; Should this be customizable? |
73 (defvar pop3-password nil | 73 (defvar pop3-password nil |
75 | 75 |
76 (defcustom pop3-authentication-scheme 'pass | 76 (defcustom pop3-authentication-scheme 'pass |
77 "*POP3 authentication scheme. | 77 "*POP3 authentication scheme. |
78 Defaults to 'pass, for the standard USER/PASS authentication. Other valid | 78 Defaults to 'pass, for the standard USER/PASS authentication. Other valid |
79 values are 'apop." | 79 values are 'apop." |
80 :version "21.4" ;; Oort Gnus | 80 :version "22.1" ;; Oort Gnus |
81 :type '(choice (const :tag "USER/PASS" pass) | 81 :type '(choice (const :tag "USER/PASS" pass) |
82 (const :tag "APOP" apop)) | 82 (const :tag "APOP" apop)) |
83 :group 'pop3) | 83 :group 'pop3) |
84 | 84 |
85 (defcustom pop3-leave-mail-on-server nil | 85 (defcustom pop3-leave-mail-on-server nil |
89 left on the POP server after fetching. Note that POP servers | 89 left on the POP server after fetching. Note that POP servers |
90 maintain no state information between sessions, so what the | 90 maintain no state information between sessions, so what the |
91 client believes is there and what is actually there may not match | 91 client believes is there and what is actually there may not match |
92 up. If they do not, then the whole thing can fall apart and | 92 up. If they do not, then the whole thing can fall apart and |
93 leave you with a corrupt mailbox." | 93 leave you with a corrupt mailbox." |
94 :version "21.4" ;; Oort Gnus | 94 :version "22.1" ;; Oort Gnus |
95 :type 'boolean | 95 :type 'boolean |
96 :group 'pop3) | 96 :group 'pop3) |
97 | 97 |
98 (defvar pop3-timestamp nil | 98 (defvar pop3-timestamp nil |
99 "Timestamp returned when initially connected to the POP server. | 99 "Timestamp returned when initially connected to the POP server. |