# HG changeset patch
# User Magnus Henoch <mange@freemail.hu>
# Date 1163632479 0
# Node ID fd0232950658095c5caf882bed8e51443996836a
# Parent  164e49fc12a738b6e08a1bc80922134d050b8c06
(url-generic-parse-url): Use with-temp-buffer.

diff -r 164e49fc12a7 -r fd0232950658 lisp/url/url-parse.el
--- a/lisp/url/url-parse.el	Wed Nov 15 23:07:23 2006 +0000
+++ b/lisp/url/url-parse.el	Wed Nov 15 23:14:39 2006 +0000
@@ -135,8 +135,7 @@
       (url-set-full retval nil)
       retval))
    (t
-    (save-excursion
-      (set-buffer (get-buffer-create " *urlparse*"))
+    (with-temp-buffer
       (set-syntax-table url-parse-syntax-table)
       (let ((save-pos nil)
 	    (prot nil)