diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 09f2c804b9f..b5a3c2f46f2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-11-25  Bozhidar Batsov  <bozhidar@bozhidar-home.local>
+
+	* emacs-lisp/bytecomp.el (byte-compile-form): Fix a typo.
+
 2013-11-25  Sebastian Wiesner <lunaryorn@gmail.com>
 
 	* emacs-lisp/bytecomp.el (byte-compile-interactive-only-functions):
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index faa72e73959..116f356822e 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2930,7 +2930,7 @@ for symbols generated by the byte compiler itself."
      ((symbolp (car form))
       (let* ((fn (car form))
              (handler (get fn 'byte-compile))
-	     (interactive-onaly (or (get fn 'interactive-only)
+	     (interactive-only (or (get fn 'interactive-only)
 				   (memq fn byte-compile-interactive-only-functions))))
         (when (macroexp--const-symbol-p fn)
           (byte-compile-warn "`%s' called as a function" fn))