scratch/bug-50244 2a02ac1 3/8: Unbreak M-x compile-defun of functions using flymake-log

[João Távora]

branch: scratch/bug-50244
commit 2a02ac1fda22448fd74ea91fb15e6bec81743682
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    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.
---
 lisp/progmodes/flymake.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index dbda4df..2900ba1 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))))))