diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-08-29 16:22:25 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-08-29 16:22:25 +0000 |
| commit | 4920f4561e4601a96c866317f359836ef36305e8 (patch) | |
| tree | f06f7da66601e204bcb99d76a6564d74fc386421 /lisp/dired-aux.el | |
| parent | 1f41f852b33968f08214aa7bcd09380b857ef2ed (diff) | |
| download | emacs-4920f4561e4601a96c866317f359836ef36305e8.tar.gz | |
(dired-byte-compile): Report failure if output file is not created.
Diffstat (limited to 'lisp/dired-aux.el')
| -rw-r--r-- | lisp/dired-aux.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index e08094ff2da..27ef4397d74 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -649,6 +649,8 @@ and use this command with a prefix argument (the value does not matter)." (error (setq failure err))) (setq elc-file (byte-compile-dest-file filename)) + (or (file-exists-p elc-file) + (setq failure t)) (if failure (progn (dired-log "Byte compile error for %s:\n%s\n" filename failure) |