Mercurial > emacs
comparison lisp/net/browse-url.el @ 110858:a6ae19bc27ec
* net/browse-url.el (browse-url-xdg-open): Remove use of /bin/sh.
| author | Andreas Schwab <schwab@linux-m68k.org> |
|---|---|
| date | Fri, 08 Oct 2010 19:32:14 +0200 |
| parents | a9f5356546ca |
| children | 1b90af51024f |
comparison
equal
deleted
inserted
replaced
| 110857:93079c0866aa | 110858:a6ae19bc27ec |
|---|---|
| 935 | 935 |
| 936 | 936 |
| 937 ;;;###autoload | 937 ;;;###autoload |
| 938 (defun browse-url-xdg-open (url &optional new-window) | 938 (defun browse-url-xdg-open (url &optional new-window) |
| 939 (interactive (browse-url-interactive-arg "URL: ")) | 939 (interactive (browse-url-interactive-arg "URL: ")) |
| 940 (call-process "/bin/sh" nil nil nil | 940 (call-process "nohup" nil nil nil "xdg-open" url)) |
| 941 "-c" | |
| 942 (concat "nohup xdg-open " (shell-quote-argument url) | |
| 943 ">/dev/null 2>&1 </dev/null"))) | |
| 944 | 941 |
| 945 ;;;###autoload | 942 ;;;###autoload |
| 946 (defun browse-url-netscape (url &optional new-window) | 943 (defun browse-url-netscape (url &optional new-window) |
| 947 "Ask the Netscape WWW browser to load URL. | 944 "Ask the Netscape WWW browser to load URL. |
| 948 Default to the URL around or before point. The strings in variable | 945 Default to the URL around or before point. The strings in variable |