Commit 3f172d5d authored by Karl Heuer's avatar Karl Heuer
Browse files

(term-if-emacs19): Recognize version 20.

parent a137e62c
......@@ -634,9 +634,10 @@ Buffer local variable.")
(put 'term-scroll-show-maximum-output 'permanent-local t)
(put 'term-ptyp 'permanent-local t)
;; Do FORMS if running under Emacs-19.
;; Do FORMS if running under Emacs 19 or later.
(defmacro term-if-emacs19 (&rest forms)
(if (string-match "^19" emacs-version) (cons 'progn forms)))
(if (string-match "^\\(19\\|[2-9][0-9]\\)" emacs-version)
(cons 'progn forms)))
;; True if running under XEmacs (previously Lucid Emacs).
(defmacro term-is-xemacs () '(string-match "Lucid" emacs-version))
;; Do FORM if running under XEmacs (previously Lucid Emacs).
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment