# HG changeset patch # User Richard M. Stallman # Date 872970494 0 # Node ID 95743e18a01cf33fd8de9f5b87b79c0d6cf1adf4 # Parent 70c989c729f14a87d075ad694c7109cf4350ff0f (defgroup, defcustom): Add Emacs 19 compatibility definitions. diff -r 70c989c729f1 -r 95743e18a01c lisp/textmodes/texinfmt.el --- a/lisp/textmodes/texinfmt.el Sat Aug 30 19:46:24 1997 +0000 +++ b/lisp/textmodes/texinfmt.el Sat Aug 30 19:48:14 1997 +0000 @@ -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) diff -r 70c989c729f1 -r 95743e18a01c lisp/textmodes/texinfo.el --- a/lisp/textmodes/texinfo.el Sat Aug 30 19:46:24 1997 +0000 +++ b/lisp/textmodes/texinfo.el Sat Aug 30 19:48:14 1997 +0000 @@ -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) diff -r 70c989c729f1 -r 95743e18a01c lisp/textmodes/texnfo-upd.el --- a/lisp/textmodes/texnfo-upd.el Sat Aug 30 19:46:24 1997 +0000 +++ b/lisp/textmodes/texnfo-upd.el Sat Aug 30 19:48:14 1997 +0000 @@ -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.