procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
Fixes: debbugs:15417
This commit is contained in:
Kevin Rodgers 2013-10-02 19:33:48 -04:00 • committed by Stefan Monnier
parent c348360a2b
commit 376f862a32
2 changed files with 15 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
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.

11
lisp/progmodes/compile.el
View file

@ -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))