# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1156538466 0
# Node ID 97366e4e79a55ac2ffa86fe86509d63a26e40cf2
# Parent  3a91203cdb2ac5256cbed93f48c901261b536631
(url-file-local-copy): Tell url-copy-file that the dest file will already exist.

diff -r 3a91203cdb2a -r 97366e4e79a5 lisp/url/ChangeLog
--- a/lisp/url/ChangeLog	Fri Aug 25 20:33:24 2006 +0000
+++ b/lisp/url/ChangeLog	Fri Aug 25 20:41:06 2006 +0000
@@ -1,3 +1,8 @@
+2006-08-25  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* url-handlers.el (url-file-local-copy): Tell url-copy-file that the
+	dest file will already exist.
+
 2006-07-31  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* url-util.el (url-hexify-string): Only utf-8 encode if it's
diff -r 3a91203cdb2a -r 97366e4e79a5 lisp/url/url-handlers.el
--- a/lisp/url/url-handlers.el	Fri Aug 25 20:33:24 2006 +0000
+++ b/lisp/url/url-handlers.el	Fri Aug 25 20:41:06 2006 +0000
@@ -213,7 +213,7 @@
 Returns the name of the local copy, or nil, if FILE is directly
 accessible."
   (let ((filename (make-temp-file "url")))
-    (url-copy-file url filename)
+    (url-copy-file url filename 'ok-if-already-exists)
     filename))
 
 (defun url-insert (buffer &optional beg end)