# HG changeset patch # User Karl Heuer # Date 875119104 0 # Node ID 81065d2158f905dfc6746b9fdf0d7db353a2520a # Parent 927a8710de05d6bcf81586b7bd5a3a1517de99af (term-if-emacs19): Recognize version 20. diff -r 927a8710de05 -r 81065d2158f9 lisp/term.el --- a/lisp/term.el Wed Sep 24 16:29:39 1997 +0000 +++ b/lisp/term.el Wed Sep 24 16:38:24 1997 +0000 @@ -634,9 +634,10 @@ (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).