diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2018-12-17 11:56:05 +0100 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2018-12-18 17:44:13 +0100 |
| commit | 80e98568aa41b106ebc9bbec9a44fe442a93803d (patch) | |
| tree | d70d0f4e3987fbbdfe71c939961ffe27e2eb5f57 | |
| parent | 582527976b3274585644a04223244aa10834933d (diff) | |
| download | emacs-80e98568aa41b106ebc9bbec9a44fe442a93803d.tar.gz | |
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 (unless (stringp file-name) (error "Invalid file-name")) - (let* ((dir (file-name-directory file-name)) + (let* ((dir (file-name-directory (file-name-unquote file-name))) ;; Not sure what this slash-pos is all about, but I guess it's just ;; trying to remove the leading / of absolute file names. (slash-pos (string-match "/" dir)) |