# HG changeset patch # User Thien-Thi Nguyen # Date 795198567 0 # Node ID 2736b0e7295b8713173cbea908e07e3419805f42 # Parent 8482ccc01ec7f38b8541fa280607a23b48c66b6d `emacs-version' checking now handles Lucid's version change to 19.xx. diff -r 8482ccc01ec7 -r 2736b0e7295b lisp/progmodes/hideshow.el --- 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)