aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThien-Thi Nguyen1995-03-14 16:29:27 +0000
committerThien-Thi Nguyen1995-03-14 16:29:27 +0000
commit20171c7c69aed5d4e343658f386e7d22370a1640 (patch)
tree69dc6c3d5e45b549d6321d6f457ce261fda263bb
parent9e552710cfe6b2125233af963d4578d3a7451f84 (diff)
downloademacs-20171c7c69aed5d4e343658f386e7d22370a1640.tar.gz
emacs-20171c7c69aed5d4e343658f386e7d22370a1640.zip
`emacs-version' checking now handles Lucid's version change to 19.xx.
-rw-r--r--lisp/progmodes/hideshow.el16
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el
index 262543818b4..4f638dc2f75 100644
--- a/lisp/progmodes/hideshow.el
+++ b/lisp/progmodes/hideshow.el
@@ -158,11 +158,11 @@ is necessary.")
158 "Used to support both FSF Emacs and Xemacs.") 158 "Used to support both FSF Emacs and Xemacs.")
159 159
160(eval-when-compile 160(eval-when-compile
161 (if (string-match "^19" emacs-version) 161 (if (string-match "xemacs\\|lucid" emacs-version)
162 nil 162 (progn
163 (defvar current-menubar nil "") 163 (defvar current-menubar nil "")
164 (defun set-buffer-menubar (arg1)) 164 (defun set-buffer-menubar (arg1))
165 (defun add-menu (arg1 arg2 arg3)))) 165 (defun add-menu (arg1 arg2 arg3)))))
166 166
167 167
168;;;---------------------------------------------------------------------------- 168;;;----------------------------------------------------------------------------
@@ -428,9 +428,9 @@ variables to default values and disables the hideshow commands."
428 428
429;; which emacs being used? 429;; which emacs being used?
430(setq hs-emacs-type 430(setq hs-emacs-type
431 (if (string-match "^19" emacs-version) 431 (if (string-match "xemacs\\|lucid" emacs-version)
432 'fsf 432 'lucid
433 'lucid)) 433 'fsf))
434 434
435;; keymaps and menus 435;; keymaps and menus
436(if (not hs-minor-mode-map) 436(if (not hs-minor-mode-map)