aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1993-06-15 19:29:59 +0000
committerRichard M. Stallman1993-06-15 19:29:59 +0000
commite13b624a0f960eecbfd128636d73fd469cc61694 (patch)
tree4e8b3919843ee0eeba514553cffef24d3d4ca0fa
parent0e52ea03037d13ec98db7b2725ef209921656758 (diff)
downloademacs-e13b624a0f960eecbfd128636d73fd469cc61694.tar.gz
emacs-e13b624a0f960eecbfd128636d73fd469cc61694.zip
(byte-compile-file-form-defmumble): Use defalias
for named function, even if no doc string.
-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."
1579 (if (not (stringp (nth 3 form))) 1579 (if (not (stringp (nth 3 form)))
1580 ;; No doc string to make-docfile; insert form in normal code. 1580 ;; No doc string to make-docfile; insert form in normal code.
1581 (byte-compile-keep-pending 1581 (byte-compile-keep-pending
1582 (list 'fset (list 'quote name) 1582 (list 'defalias (list 'quote name)
1583 (cond ((not macrop) 1583 (cond ((not macrop)
1584 code) 1584 code)
1585 ((eq 'make-byte-code (car-safe code)) 1585 ((eq 'make-byte-code (car-safe code))