summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-06-15 19:29:59 +0000
committerRichard M. Stallman <rms@gnu.org>1993-06-15 19:29:59 +0000
commite13b624a0f960eecbfd128636d73fd469cc61694 (patch)
tree4e8b3919843ee0eeba514553cffef24d3d4ca0fa /lisp/emacs-lisp/bytecomp.el
parent0e52ea03037d13ec98db7b2725ef209921656758 (diff)
downloademacs-e13b624a0f960eecbfd128636d73fd469cc61694.tar.gz
emacs-e13b624a0f960eecbfd128636d73fd469cc61694.tar.bz2
emacs-e13b624a0f960eecbfd128636d73fd469cc61694.zip
(byte-compile-file-form-defmumble): Use defalias
for named function, even if no doc string.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index bbb977d2be5..f3462d7a189 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1579,7 +1579,7 @@ With argument, insert value in current buffer after the form."
(if (not (stringp (nth 3 form)))
;; No doc string to make-docfile; insert form in normal code.
(byte-compile-keep-pending
- (list 'fset (list 'quote name)
+ (list 'defalias (list 'quote name)
(cond ((not macrop)
code)
((eq 'make-byte-code (car-safe code))