diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2018-01-19 11:29:13 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2018-01-19 11:29:13 -0500 |
| commit | 728ded05f617d48f4a693713d72af872395ebd55 (patch) | |
| tree | d90b1604e23b9e69e4e1fdc88e587a68a3d2d4a0 /lisp/emacs-lisp | |
| parent | c6c05e2aa9d28a74df0b61b4f56745f1248a779e (diff) | |
| download | emacs-728ded05f617d48f4a693713d72af872395ebd55.tar.gz emacs-728ded05f617d48f4a693713d72af872395ebd55.tar.bz2 emacs-728ded05f617d48f4a693713d72af872395ebd55.zip | |
* lisp/emacs-lisp/bytecomp.el: Tweak last change
(byte-compile-file): Move comment closer to the code it describes.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 3c9c62eb23d..700a7c16b58 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -1933,15 +1933,15 @@ The value is non-nil if there were no errors, nil if errors." ;; parallel bootstrap), it does not risk getting a ;; half-finished file. (Bug#4196) (tempfile - ;; If target-file is relative and includes - ;; leading directories, make-temp-file will - ;; assume those leading directories exist - ;; under temporary-file-directory, which might - ;; not be true. So strip leading directories - ;; from relative file names before calling - ;; make-temp-file. (if (file-name-absolute-p target-file) (make-temp-file target-file) + ;; If target-file is relative and includes + ;; leading directories, make-temp-file will + ;; assume those leading directories exist + ;; under temporary-file-directory, which might + ;; not be true. So strip leading directories + ;; from relative file names before calling + ;; make-temp-file. (make-temp-file (file-name-nondirectory target-file)))) (default-modes (default-file-modes)) |