From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 24 Sep 1997 16:38:24 +0000 (+0000)
Subject: (term-if-emacs19): Recognize version 20.
X-Git-Tag: emacs-20.3~3097
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3f172d5d6560b0a367ce3d720b067e0e84ddd6d9;p=emacs.git

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

diff --git a/lisp/term.el b/lisp/term.el
index 141f874c285..5ca95e3e511 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -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).