diff options
author | Richard M. Stallman <rms@gnu.org> | 1993-06-15 19:29:59 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1993-06-15 19:29:59 +0000 |
commit | e13b624a0f960eecbfd128636d73fd469cc61694 (patch) | |
tree | 4e8b3919843ee0eeba514553cffef24d3d4ca0fa /lisp/emacs-lisp | |
parent | 0e52ea03037d13ec98db7b2725ef209921656758 (diff) | |
download | emacs-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')
-rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
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)) |