From 6f145ee6244f0465fcfce8fb7bdfbfb4ec2b63ec Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Fri, 13 Jul 2007 12:07:46 +0000 Subject: [PATCH] PR8792 svn: r6905 original commit: 816d216862a220241b4150589142172608d8411c --- collects/net/sendurl.ss | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/collects/net/sendurl.ss b/collects/net/sendurl.ss index 39dbc60386..0c9d0be2cd 100644 --- a/collects/net/sendurl.ss +++ b/collects/net/sendurl.ss @@ -57,8 +57,7 @@ [(procedure? external) (external url-str)] [(eq? stype 'macosx) (browser-process - (format "osascript -e 'open location \"~a\"'" - url-str))] + (format "open \"~a\"'" url-str))] [(eq? stype 'windows) (shell-execute #f url-str "" (current-directory) 'SW_SHOWNORMAL)] [(not (eq? stype 'unix)) @@ -77,7 +76,8 @@ => (lambda (exe) (browser-process* exe (if separate-window? "-w" "-x") url-str))] [(or (use-browser 'netscape) - (use-browser 'mozilla)) + (use-browser 'mozilla) + (use-browser 'firefox)) => (lambda (exe) ;; netscape's -remote returns with an error code, if no netscape is ;; around. start a new netscape in that case.