summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/backquote.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index e61f24935ac..9e1c6c29203 100644
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -78,12 +78,11 @@ For example (backquote-list* 'a 'b 'c) => (a b . c)"
newlist)
first))
-(fset 'backquote-list* (symbol-function 'backquote-list*-macro))
+(defalias 'backquote-list* (symbol-function 'backquote-list*-macro))
;; A few advertised variables that control which symbols are used
;; to represent the backquote, unquote, and splice operations.
-;;;###autoload
(defvar backquote-backquote-symbol '`
"*Symbol used to represent a backquote or nested backquote (e.g. `).")
@@ -113,7 +112,7 @@ Vectors work just like lists. Nested backquotes are permitted."
;; GNU Emacs has no reader macros
;;;###autoload
-(fset backquote-backquote-symbol (symbol-function 'backquote))
+(defalias '` (symbol-function 'backquote))
;; backquote-process returns a dotted-pair of a tag (0, 1, or 2) and
;; the backquote-processed structure. 0 => the structure is