Mercurial > emacs

changeset 11001:2736b0e7295b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
`emacs-version' checking now handles Lucid's version change to 19.xx.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Tue, 14 Mar 1995 16:29:27 +0000
parents 8482ccc01ec7
children ff115809a39e
files lisp/progmodes/hideshow.el
diffstat 1 files changed, 8 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/hideshow.el	Tue Mar 14 05:54:51 1995 +0000
+++ b/lisp/progmodes/hideshow.el	Tue Mar 14 16:29:27 1995 +0000
@@ -158,11 +158,11 @@
   "Used to support both FSF Emacs and Xemacs.")
 
 (eval-when-compile
-  (if (string-match "^19" emacs-version)
-      nil
-    (defvar current-menubar nil "")
-    (defun set-buffer-menubar (arg1))
-    (defun add-menu (arg1 arg2 arg3))))
+  (if (string-match "xemacs\\|lucid" emacs-version)
+      (progn
+	(defvar current-menubar nil "")
+	(defun set-buffer-menubar (arg1))
+	(defun add-menu (arg1 arg2 arg3)))))
 
 
 ;;;----------------------------------------------------------------------------
@@ -428,9 +428,9 @@
 
 ;; which emacs being used?
 (setq hs-emacs-type
-      (if (string-match "^19" emacs-version)
-	  'fsf
-	'lucid))
+      (if (string-match "xemacs\\|lucid" emacs-version)
+	  'lucid
+	'fsf))
 
 ;; keymaps and menus
 (if (not hs-minor-mode-map)