mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-11 16:08:13 +00:00
Code Issues Releases Activity

(sc-emacs-features): Test for "Emacs 19"

Browse Source 
by really checking that it is not version 18.
This commit is contained in:
Richard M. Stallman 2001-10-28 14:20:39 +00:00
parent 46f90d0ff3
commit 36656ee3bc
2 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@ -1,5 +1,11 @@
2001-10-28 Richard M. Stallman <rms@gnu.org>
* textmodes/ispell.el (version18p, version20p): Vars deleted.
All uses removed--assume Emacs version is >= 20.
* mail/supercite.el (sc-emacs-features): Test for "Emacs 19"
by really checking that it is not version 18.
* emacs-lisp/lisp-mode.el (eval-defun): Doc fix.
2001-10-28 Miles Bader <miles@gnu.org>

11
lisp/mail/supercite.el
View File

@ -513,9 +513,8 @@ string."
(defconst sc-emacs-features
(let ((version 'v18)
(flavor 'GNU))
(if (or
(string= (substring emacs-version 0 2) "19")
(string= (substring emacs-version 0 2) "20"))
(if (not
(string= (substring emacs-version 0 2) "18"))
(setq version 'v19))
(if (string-match "Lucid" emacs-version)
(setq flavor 'Lucid))
@ -524,9 +523,9 @@ string."
"A list describing what version of Emacs we're running on.
Known flavors are:
Emacs 18 : (v18 GNU)
Emacs 19 or 20 : (v19 GNU)
Lucid 19 or 20 : (v19 Lucid)")
Emacs 18 : (v18 GNU)
Emacs 19 or later : (v19 GNU)
Lucid 19 or later : (v19 Lucid)")
(defvar sc-tmp-nested-regexp nil