mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

`emacs-version' checking now handles Lucid's version change to 19.xx.

Browse source
This commit is contained in:
Thien-Thi Nguyen 1995-03-14 16:29:27 +00:00
parent 9e552710cf
commit 20171c7c69
1 changed files with 8 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lisp/progmodes/hideshow.el
View file

@ -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)