diff options
author | Juanma Barranquero <[email protected]> | 2003-01-31 15:24:20 +0000 |
---|---|---|
committer | Juanma Barranquero <[email protected]> | 2003-01-31 15:24:20 +0000 |
commit | c60ee5e70f7ae20f1bbf7d0e2d36f40658f3dff1 (patch) | |
tree | 7d28300d64e41bf2aeed37bc8f1293f9fc52a36a /lisp/net | |
parent | 2454c12d458c60b871f6f36c3fd6ba752aad61bf (diff) |
Cygwin support patch.
Diffstat (limited to 'lisp/net')
-rw-r--r-- | lisp/net/browse-url.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index 0a417a22f0..0ebc41150d 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el @@ -227,7 +227,7 @@ ;;;###autoload (defcustom browse-url-browser-function - (if (memq system-type '(windows-nt ms-dos)) + (if (memq system-type '(windows-nt ms-dos cygwin)) 'browse-url-default-windows-browser 'browse-url-default-browser) "*Function to display the current buffer in a WWW browser. @@ -381,7 +381,7 @@ commands reverses the effect of this variable. Requires Netscape version ;; it in anonymous cases. If it's not anonymous the next regexp ;; applies. ("^/\\([^:@]+@\\)?\\([^:]+\\):/*" . "ftp://\\1\\2/") - (,@ (if (memq system-type '(windows-nt ms-dos)) + (,@ (if (memq system-type '(windows-nt ms-dos cygwin)) '(("^\\([a-zA-Z]:\\)[\\/]" . "file:\\1/") ("^[\\/][\\/]+" . "file://")))) ("^/+" . "file:/"))) @@ -972,7 +972,7 @@ effect of `browse-url-new-window-flag'. When called non-interactively, optional second argument NEW-WINDOW is used instead of `browse-url-new-window-flag'." - (interactive (browse-url-interactive-arg "URL: ")) + (interactive (browse-url-interactive-arg "URL: ")) (apply 'start-process (concat "gnome-moz-remote " url) nil "gnome-moz-remote" |