aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mail
diff options
context:
space:
mode:
authorStefan Kangas2019-09-13 18:06:31 +0200
committerStefan Kangas2019-09-13 18:37:15 +0200
commit45b01f2d7fc9929fccf2e173291001ab04387947 (patch)
treeb431b89800a06b84ae44b0474edfb96cfcbed0c9 /lisp/mail
parent897540069fb09d091802046046daca821079aac5 (diff)
downloademacs-45b01f2d7fc9929fccf2e173291001ab04387947.tar.gz
emacs-45b01f2d7fc9929fccf2e173291001ab04387947.zip
Remove leftover XEmacs compat code and doc fixes
* lisp/mail/feedmail.el (top-level): Remove outdated comment. (feedmail-run-the-queue): Remove leftover XEmacs compat code. (feedmail-nuke-bcc): Doc fix. * lisp/emulation/viper.el (top-level, viper-mode) * lisp/net/rfc2104.el (top-level): Doc fix. * lisp/textmodes/table.el (top-level): Remove obsolete todo.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/feedmail.el17
1 files changed, 2 insertions, 15 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el
index babc3fc212a..b362614d3a0 100644
--- a/lisp/mail/feedmail.el
+++ b/lisp/mail/feedmail.el
@@ -17,15 +17,6 @@
17;; ability to queue messages for later sending. This replaces 17;; ability to queue messages for later sending. This replaces
18;; the standalone fakemail program that used to be distributed with Emacs. 18;; the standalone fakemail program that used to be distributed with Emacs.
19 19
20;; feedmail works with recent versions of Emacs (20.x series) and
21;; XEmacs (tested with 20.4 and later betas). It probably no longer
22;; works with Emacs v18, though I haven't tried that in a long
23;; time. Makoto.Nakagawa@jp.compaq.com reports: "I have a report
24;; that with a help of APEL library, feedmail works fine under emacs
25;; 19.28. You can get APEL from ftp://ftp.m17n.org/pub/mule/apel/.
26;; you need apel-10.2 or later to make feedmail work under emacs
27;; 19.28."
28
29;; Sorry, no manual yet in this release. Look for one with the next 20;; Sorry, no manual yet in this release. Look for one with the next
30;; release. Or the one after that. Or maybe later. 21;; release. Or the one after that. Or maybe later.
31 22
@@ -437,9 +428,7 @@ shuttled robotically onward."
437(defcustom feedmail-confirm-outgoing-timeout nil 428(defcustom feedmail-confirm-outgoing-timeout nil
438 "If non-nil, a timeout in seconds at the send confirmation prompt. 429 "If non-nil, a timeout in seconds at the send confirmation prompt.
439If a positive number, it's a timeout before sending. If a negative 430If a positive number, it's a timeout before sending. If a negative
440number, it's a timeout before not sending. This will not work if your 431number, it's a timeout before not sending."
441version of Emacs doesn't include the function `y-or-n-p-with-timeout'
442\(e.g., some versions of XEmacs)."
443 :version "24.1" 432 :version "24.1"
444 :group 'feedmail-misc 433 :group 'feedmail-misc
445 :type '(choice (const nil) integer) 434 :type '(choice (const nil) integer)
@@ -2004,9 +1993,7 @@ backup file names and the like)."
2004 ((feedmail-fqm-p blobby) 1993 ((feedmail-fqm-p blobby)
2005 (setq blobby-buffer (generate-new-buffer (concat "FQM " blobby))) 1994 (setq blobby-buffer (generate-new-buffer (concat "FQM " blobby)))
2006 (setq already-buffer 1995 (setq already-buffer
2007 (if (fboundp 'find-buffer-visiting) ; missing from XEmacs 1996 (find-buffer-visiting maybe-file))
2008 (find-buffer-visiting maybe-file)
2009 (get-file-buffer maybe-file)))
2010 (if (and already-buffer (buffer-modified-p already-buffer)) 1997 (if (and already-buffer (buffer-modified-p already-buffer))
2011 (save-window-excursion 1998 (save-window-excursion
2012 (display-buffer (set-buffer already-buffer)) 1999 (display-buffer (set-buffer already-buffer))