From d694737ae44dce74d367782865ee41d115c22bbd Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Mon, 25 Nov 2013 20:45:34 +0200 Subject: [PATCH] * lisp/emacs-lisp/bytecomp.el (byte-compile-form): Fix a typo. --- lisp/ChangeLog | 4 ++++ lisp/emacs-lisp/bytecomp.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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 + + * emacs-lisp/bytecomp.el (byte-compile-form): Fix a typo. + 2013-11-25 Sebastian Wiesner * 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)) -- 2.39.2