(defgroup, defcustom): Add Emacs 19 compatibility definitions.

This commit is contained in:
Richard M. Stallman 1997-08-30 19:48:14 +00:00
parent fdbc88f98b
commit 80216a47a4
3 changed files with 21 additions and 0 deletions

View file

@ -27,6 +27,13 @@
;;; Emacs lisp functions to convert Texinfo files to Info files.
(or (fboundp 'defgroup)
(defmacro defgroup (&rest ignore) nil))
(or (fboundp 'defcustom)
(defmacro defcustom (var value doc &rest ignore)
`(defvar ,var ,value ,doc)))
(defvar texinfmt-version "2.37 of 24 May 1997")
(defun texinfmt-version (&optional here)

View file

@ -27,6 +27,13 @@
;;; Code:
(or (fboundp 'defgroup)
(defmacro defgroup (&rest ignore) nil))
(or (fboundp 'defcustom)
(defmacro defcustom (var value doc &rest ignore)
`(defvar ,var ,value ,doc)))
(defgroup texinfo nil
"Texinfo Mode"
:group 'docs)

View file

@ -149,6 +149,13 @@
;;; Code:
(or (fboundp 'defgroup)
(defmacro defgroup (&rest ignore) nil))
(or (fboundp 'defcustom)
(defmacro defcustom (var value doc &rest ignore)
`(defvar ,var ,value ,doc)))
(defvar texinfo-master-menu-header
" --- The Detailed Node Listing ---\n"
"String inserted before lower level entries in Texinfo master menu.