From 20171c7c69aed5d4e343658f386e7d22370a1640 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Tue, 14 Mar 1995 16:29:27 +0000 Subject: [PATCH] `emacs-version' checking now handles Lucid's version change to 19.xx. --- lisp/progmodes/hideshow.el | 16 ++++++++-------- 1 file 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.") "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 @@ variables to default values and disables the hideshow commands." ;; 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) -- 2.39.5