From: Richard M. Stallman Date: Wed, 22 Apr 1998 02:46:30 +0000 (+0000) Subject: (defcustom, defgroup, defface): Don't use backquote. X-Git-Tag: emacs-20.3~1373 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d7c0adec0a15fee33b62a2449254ef058bfb6c37;p=emacs.git (defcustom, defgroup, defface): Don't use backquote. --- diff --git a/lisp/custom.el b/lisp/custom.el index 285723c4180..127d96e1af9 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -193,7 +193,14 @@ The following KEYWORD's are defined: Read the section about customization in the Emacs Lisp manual for more information." - `(custom-declare-variable (quote ,symbol) (quote ,value) ,doc ,@args)) + ;; It is better not to use backquote in this file, + ;; because that makes a bootstrapping problem + ;; if you need to recompile all the Lisp files using interpreted code. + (nconc (list 'custom-declare-variable + (list 'quote symbol) + (list 'quote value) + doc) + args)) ;;; The `defface' Macro. @@ -243,7 +250,10 @@ following REQ are defined: Read the section about customization in the Emacs Lisp manual for more information." - `(custom-declare-face (quote ,face) ,spec ,doc ,@args)) + ;; It is better not to use backquote in this file, + ;; because that makes a bootstrapping problem + ;; if you need to recompile all the Lisp files using interpreted code. + (nconc (list 'custom-declare-face (list 'quote face) spec doc) args)) ;;; The `defgroup' Macro. @@ -295,7 +305,10 @@ The following KEYWORD's are defined: Read the section about customization in the Emacs Lisp manual for more information." - `(custom-declare-group (quote ,symbol) ,members ,doc ,@args)) + ;; It is better not to use backquote in this file, + ;; because that makes a bootstrapping problem + ;; if you need to recompile all the Lisp files using interpreted code. + (nconc (list 'custom-declare-group (list 'quote symbol) members doc) args)) (defun custom-add-to-group (group option widget) "To existing GROUP add a new OPTION of type WIDGET.