From 8290faa335bcb23063c9ee355ccfa1b6def202c6 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Thu, 25 Dec 2003 11:06:14 +0000 Subject: [PATCH] (jka-compr-insert-file-contents): Avoid error when file not found. --- lisp/ChangeLog | 5 +++++ lisp/jka-compr.el | 9 +++++---- 2 files changed, 10 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5c667e0b353..a865e943a11 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-12-25 Andreas Schwab + + * jka-compr.el (jka-compr-insert-file-contents): Avoid error when + file not found. + 2003-12-08 Miles Bader * dired.el (dired-between-files): Always use dired-move-to-filename, diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index dd56c9c0f31..aae0f0f85c1 100644 --- 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 -- 2.39.2