diff options
| author | Daniel Colascione <dancol@dancol.org> | 2014-01-15 15:49:40 -0800 |
|---|---|---|
| committer | Daniel Colascione <dancol@dancol.org> | 2014-01-15 15:49:40 -0800 |
| commit | 93acfb0eff2c089abf14caa95f5599cdbd99fb48 (patch) | |
| tree | 08a15c9dffbe14985846cdd8a334f40490f1220b /lisp/emacs-lisp | |
| parent | c7880bc8f0fcbbe5744bd563ced34743bcaa9edd (diff) | |
| download | emacs-93acfb0eff2c089abf14caa95f5599cdbd99fb48.tar.gz emacs-93acfb0eff2c089abf14caa95f5599cdbd99fb48.tar.bz2 emacs-93acfb0eff2c089abf14caa95f5599cdbd99fb48.zip | |
Use whole file-name-history'.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 1e21a222149..6f5b6295d1e 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1714,7 +1714,7 @@ The value is non-nil if there were no errors, nil if errors." (list (read-file-name (if current-prefix-arg "Byte compile and load file: " "Byte compile file: ") - file-dir file-name nil) + file-dir buffer-file-name nil) current-prefix-arg))) ;; Expand now so we get the current buffer's defaults (setq filename (expand-file-name filename)) |