From: João Távora Date: Tue, 31 Aug 2021 17:32:58 +0000 (+0100) Subject: Unbreak M-x compile-defun of functions using flymake-log X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2a02ac1fda22448fd74ea91fb15e6bec81743682;p=emacs.git Unbreak M-x compile-defun of functions using flymake-log * lisp/progmodes/flymake.el (flymake-log): Check if compilation unit is indeed a string before treating it as a file name. --- diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index dbda4dfcc52..2900ba15ba9 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -291,7 +291,7 @@ generated it." (macroexp-file-name) (and (not load-file-name) (bound-and-true-p byte-compile-current-file)))) - (sublog (if file + (sublog (if (stringp file) (intern (file-name-nondirectory (file-name-sans-extension file))))))