(jka-compr-insert-file-contents): Avoid error when

file not found.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5c667e0b3535288101728c28978d4cbab9905ffe..a865e943a1128b6d665865f8db578599cbbf4819 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-12-25  Andreas Schwab  <schwab@suse.de>
+
+       * jka-compr.el (jka-compr-insert-file-contents): Avoid error when
+       file not found.
+
 2003-12-08  Miles Bader  <miles@gnu.org>
 
        * dired.el (dired-between-files): Always use dired-move-to-filename,

diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el
index dd56c9c0f31293f878bfe9b76e871be8b42db8b6..aae0f0f85c1a7b4243492d93bb267939ab5834ae 100644 (file)
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -590,10 +590,11 @@ There should be no more than seven characters after the final `/'."
             (file-exists-p local-copy)
             (delete-file local-copy)))
 
-         (decode-coding-inserted-region
-          (point) (+ (point) size)
-          (jka-compr-byte-compiler-base-file-name file)
-          visit beg end replace)
+         (unless notfound
+           (decode-coding-inserted-region
+            (point) (+ (point) size)
+            (jka-compr-byte-compiler-base-file-name file)
+            visit beg end replace))
 
          (and
           visit