* lisp/net/browse-url.el (browse-url-xdg-open): Shell-quote url. (Bug#7166)

e4adf61e · Glenn Morris · 360ac530 · e4adf61e · e4adf61e
Commit e4adf61e authored Oct 07, 2010 by Glenn Morris
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/net/browse-url.el lisp/net/browse-url.el +1 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2010-10-08  Glenn Morris  <rgm@gnu.org>
+
+	* net/browse-url.el (browse-url-xdg-open): Shell-quote url.  (Bug#7166)
+
 2010-10-07  Chong Yidong  <cyd@stupidchicken.com>
  
 	* cus-edit.el (custom-variable, custom-face): Doc fix.

--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -939,7 +939,7 @@ Galeon, Konqueror, Netscape, Mosaic, Lynx in an xterm, and then W3."
  (interactive (browse-url-interactive-arg "URL: "))
  (call-process "/bin/sh" nil nil nil
 		"-c"
-		(concat "nohup xdg-open " url
+		(concat "nohup xdg-open " (shell-quote-argument url)
 			">/dev/null 2>&1 </dev/null")))

 ;;;###autoload
@@ -1571,5 +1571,4 @@ from `browse-url-elinks-wrapper'."

 (provide 'browse-url)

-;; arch-tag: d2079573-5c06-4097-9598-f550fba19430
 ;;; browse-url.el ends here