diff options
| author | Michael Albinus | 2018-12-17 11:56:05 +0100 |
|---|---|---|
| committer | Michael Albinus | 2018-12-18 17:44:13 +0100 |
| commit | 80e98568aa41b106ebc9bbec9a44fe442a93803d (patch) | |
| tree | d70d0f4e3987fbbdfe71c939961ffe27e2eb5f57 | |
| parent | 582527976b3274585644a04223244aa10834933d (diff) | |
| download | emacs-80e98568aa41b106ebc9bbec9a44fe442a93803d.tar.gz emacs-80e98568aa41b106ebc9bbec9a44fe442a93803d.zip | |
Fix Bug#33524
* lisp/progmodes/flymake-proc.el
(flymake-proc-create-temp-with-folder-structure):
Unquote file-name. (Bug#33524)
| -rw-r--r-- | lisp/progmodes/flymake-proc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/flymake-proc.el b/lisp/progmodes/flymake-proc.el index 4792a945308..7916108a830 100644 --- a/lisp/progmodes/flymake-proc.el +++ b/lisp/progmodes/flymake-proc.el | |||
| @@ -854,7 +854,7 @@ can also be executed interactively independently of | |||
| 854 | (unless (stringp file-name) | 854 | (unless (stringp file-name) |
| 855 | (error "Invalid file-name")) | 855 | (error "Invalid file-name")) |
| 856 | 856 | ||
| 857 | (let* ((dir (file-name-directory file-name)) | 857 | (let* ((dir (file-name-directory (file-name-unquote file-name))) |
| 858 | ;; Not sure what this slash-pos is all about, but I guess it's just | 858 | ;; Not sure what this slash-pos is all about, but I guess it's just |
| 859 | ;; trying to remove the leading / of absolute file names. | 859 | ;; trying to remove the leading / of absolute file names. |
| 860 | (slash-pos (string-match "/" dir)) | 860 | (slash-pos (string-match "/" dir)) |