# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 904050995 0
# Node ID 86a92272892c3e1326d911307f15f1f8b9eb76cc
# Parent  e4419c63d4d7ba6ed7ddba5971290277d15ec8a5
(browse-url-netscape): Fix format for hex escapes.

diff -r e4419c63d4d7 -r 86a92272892c lisp/browse-url.el
--- a/lisp/browse-url.el	Tue Aug 25 10:25:03 1998 +0000
+++ b/lisp/browse-url.el	Tue Aug 25 13:16:35 1998 +0000
@@ -700,7 +700,7 @@
   ;; include at least commas; presumably also close parens.
   (while (string-match "[,)]" url)
     (setq url (replace-match
-	       (format "%x" (string-to-char (match-string 0 url))) t t url)))
+	       (format "%%%x" (string-to-char (match-string 0 url))) t t url)))
   (let* ((process-environment (browse-url-process-environment))
          (process (apply 'start-process
  			(concat "netscape " url) nil