diff options
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/supercite.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el index dd5ce02946f..db4a492de1d 100644 --- a/lisp/mail/supercite.el +++ b/lisp/mail/supercite.el | |||
| @@ -513,9 +513,8 @@ string." | |||
| 513 | (defconst sc-emacs-features | 513 | (defconst sc-emacs-features |
| 514 | (let ((version 'v18) | 514 | (let ((version 'v18) |
| 515 | (flavor 'GNU)) | 515 | (flavor 'GNU)) |
| 516 | (if (or | 516 | (if (not |
| 517 | (string= (substring emacs-version 0 2) "19") | 517 | (string= (substring emacs-version 0 2) "18")) |
| 518 | (string= (substring emacs-version 0 2) "20")) | ||
| 519 | (setq version 'v19)) | 518 | (setq version 'v19)) |
| 520 | (if (string-match "Lucid" emacs-version) | 519 | (if (string-match "Lucid" emacs-version) |
| 521 | (setq flavor 'Lucid)) | 520 | (setq flavor 'Lucid)) |
| @@ -524,9 +523,9 @@ string." | |||
| 524 | "A list describing what version of Emacs we're running on. | 523 | "A list describing what version of Emacs we're running on. |
| 525 | Known flavors are: | 524 | Known flavors are: |
| 526 | 525 | ||
| 527 | Emacs 18 : (v18 GNU) | 526 | Emacs 18 : (v18 GNU) |
| 528 | Emacs 19 or 20 : (v19 GNU) | 527 | Emacs 19 or later : (v19 GNU) |
| 529 | Lucid 19 or 20 : (v19 Lucid)") | 528 | Lucid 19 or later : (v19 Lucid)") |
| 530 | 529 | ||
| 531 | 530 | ||
| 532 | (defvar sc-tmp-nested-regexp nil | 531 | (defvar sc-tmp-nested-regexp nil |