Spelling fixes.

[bpt/emacs.git] / lisp / emacs-lisp / bytecomp.el

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index af7bc81..71b61ec 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2367,7 +2367,7 @@ not to take responsibility for the actual compilation of the code."
       ;;(byte-compile-set-symbol-position name)
       (byte-compile-warn "probable `\"' without `\\' in doc string of %s"
                          name))
-    
+
     (if (not (listp body))
         ;; The precise definition requires evaluation to find out, so it
         ;; will only be known at runtime.
@@ -2451,7 +2451,7 @@ If QUOTED is non-nil, print with quoting; otherwise, print without quoting."
           (- (position-bytes (point)) (point-min) -1)
         (goto-char (point-max))))))
 
-(defun byte-compile--refiy-function (fun)
+(defun byte-compile--reify-function (fun)
   "Return an expression which will evaluate to a function value FUN.
 FUN should be either a `lambda' value or a `closure' value."
   (pcase-let* (((or (and `(lambda ,args . ,body) (let env nil))
@@ -2488,7 +2488,7 @@ If FORM is a lambda or a macro, byte-compile it as a function."
       (when (symbolp form)
         (unless (memq (car-safe fun) '(closure lambda))
           (error "Don't know how to compile %S" fun))
-        (setq fun (byte-compile--refiy-function fun))
+        (setq fun (byte-compile--reify-function fun))
         (setq lexical-binding (eq (car fun) 'closure)))
       (unless (eq (car-safe fun) 'lambda)
         (error "Don't know how to compile %S" fun))