Commit 376f862a authored by Kevin Rodgers's avatar Kevin Rodgers Committed by Stefan Monnier
Browse files

* lisp/progmodes/compile.el (compilation-start): Try globbing the arg to `cd'.

Fixes: debbugs:15417
parent c348360a
2013-10-02 Kevin Rodgers <kevin.d.rodgers@gmail.com>
* progmodes/compile.el (compilation-start): Try globbing the arg to
`cd' (bug#15417).
2013-10-02 Michael Albinus <michael.albinus@gmx.de>
Sync with Tramp 2.2.8.
......
......@@ -1583,7 +1583,16 @@ Returns the compilation buffer created."
"\\\\\\(.\\)" "\\1"
(substring command (1+ (match-beginning 1))
(1- (match-end 1)))))
(t (substitute-env-vars (match-string 1 command)))))
;; Try globbing as well (bug#15417).
(t (let* ((substituted-dir
(substitute-env-vars (match-string 1 command)))
;; FIXME: This also tries to expand `*' that were
;; introduced by the envvar expansion!
(expanded-dir
(file-expand-wildcards substituted-dir)))
(if (= (length expanded-dir) 1)
(car expanded-dir)
substituted-dir)))))
(erase-buffer)
;; Select the desired mode.
(if (not (eq mode t))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment