; * lisp/emacs-lisp/comp.el (comp-funciton-type-spec): typo

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 86707dd3516a164c2bdd8c628b45aa5cce068a60..e516c8b5eb9191c556a75ee1e7ab1ced8d362b6d 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -4448,7 +4448,7 @@ of (commands) to run simultaneously."
   (message "Cache cleared"))
 
 ;;;###autoload
-(defun comp-funciton-type-spec (function)
+(defun comp-function-type-spec (function)
   "Given FUNCTION gives its type specifier.
 Return a cons with its car being the function specifier and its
 cdr being a symbol.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index dcf265ea17019c563686086e889f9754c9b23914..b9388b453970cd49a65534ab4eac3d215199db6b 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -711,7 +711,7 @@ the C sources, too."
           (unless (and (symbolp function)
                        (get function 'reader-construct))
             (insert high-usage "\n")
-            (when-let* ((res (comp-funciton-type-spec function))
+            (when-let* ((res (comp-function-type-spec function))
                         (type-spec (car res))
                         (kind (cdr res)))
               (insert (format