From: ueno <ueno>
Date: Mon, 30 Jul 2007 06:30:33 +0000 (+0000)
Subject: * epa-file.el (epa-file-insert-file-contents): Ignore errors from
X-Git-Tag: epg-0_0_15~12
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7191de7d04d1a7fec0c6cad9cfe497622e5385bc;p=elisp%2Fepg.git

* epa-file.el (epa-file-insert-file-contents): Ignore errors from
file-local-copy.
---

diff --git a/ChangeLog b/ChangeLog
index 4065545..24b5a99 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-07-30  Daiki Ueno  <ueno@unixuser.org>
+
+	* epa-file.el (epa-file-insert-file-contents): Ignore errors from
+	file-local-copy.
+
 2007-07-29  Daiki Ueno  <ueno@unixuser.org>
 
 	* EasyPG: Version 0.0.14 released.
diff --git a/epa-file.el b/epa-file.el
index 66ed5b9..a6a800e 100644
--- a/epa-file.el
+++ b/epa-file.el
@@ -152,7 +152,10 @@ May either be a string or a list of strings.")
   (if (and visit (or beg end))
       (error "Attempt to visit less than an entire file"))
   (setq file (expand-file-name file))
-  (let* ((local-copy (epa-file-run-real-handler #'file-local-copy (list file)))
+  (let* ((local-copy
+	  (condition-case inl
+	      (epa-file-run-real-handler #'file-local-copy (list file))
+	    (error)))
 	 (local-file (or local-copy file))
 	 (context (epg-make-context))
 	 string length entry)