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 | d5b876efa88da30edf8bf8e8887d90d1c723b0cc (patch) | |
| tree | c023ced723ef8827bd33b75908a7812ad2bbfda0 /lisp/dired-aux.el | |
| parent | d70fbccad6f3f087f703c5c6b7c937cd6de1008f (diff) | |
| download | emacs-d5b876efa88da30edf8bf8e8887d90d1c723b0cc.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) |