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

(byte-recompile-directory): Fix bug:

Browse source 
Don't expand top-level file name more than once.
This commit is contained in:
Thien-Thi Nguyen 2007-09-01 23:32:36 +00:00
parent 70b49e5782
commit b99cc8534d
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/emacs-lisp/bytecomp.el
View file

@ -1549,7 +1549,7 @@ recompile every `.el' file that already has a `.elc' file."
;; compilation-mode copies value of default-directory.
(unless (eq major-mode 'compilation-mode)
(compilation-mode))
(let ((directories (list (expand-file-name directory)))
(let ((directories (list default-directory))
(default-directory default-directory)
(skip-count 0)
(fail-count 0)