diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2022-07-21 10:18:30 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2022-07-21 10:18:30 +0300 |
| commit | 25bc330a6da3e8f224289560aa59958f6b0f3148 (patch) | |
| tree | d0bfa340b0dd1c71184f7f5957119210df2f0a4a | |
| parent | 2b31e667be95731d7e9ee328c8331eecf69b3831 (diff) | |
| download | emacs-25bc330a6da3e8f224289560aa59958f6b0f3148.tar.gz | |
Make 'describe-function' say "byte-compiled" when appropriate
* lisp/help-fns.el (help-fns-function-description-header): Say
"byte-compiled" when describing byte-compiled functions.
| -rw-r--r-- | lisp/help-fns.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index f78c6ab0dfa..6a7951d160e 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -874,7 +874,7 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)." (aliased (format-message "an alias for `%s'" real-def)) ((subr-native-elisp-p def) - (concat beg "native compiled Lisp function")) + (concat beg "native-compiled Lisp function")) ((subrp def) (concat beg (if (eq 'unevalled (cdr (subr-arity def))) "special form" @@ -893,7 +893,7 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)." (macrop function)) (concat beg "Lisp macro")) ((byte-code-function-p def) - (concat beg "compiled Lisp function")) + (concat beg "byte-compiled Lisp function")) ((module-function-p def) (concat beg "module function")) ((eq (car-safe def) 'lambda) |