use osascrip tinsteda of open to open a URL in Mac OS X

svn: r7977

original commit: 6c2e8deee2
This commit is contained in:
Matthew Flatt 2007-12-12 21:07:25 +00:00
parent 755a287571
commit 7ca4d19282

View File

@ -59,7 +59,7 @@
(cond
[(procedure? external) (external url-str)]
[(eq? stype 'macosx)
(browser-process (format "open \"~a\"" url-str))]
(browser-process (format "osascript -e 'open location \"~a\"'" url-str))]
[(eq? stype 'windows)
(shell-execute #f url-str "" (current-directory) 'SW_SHOWNORMAL)]
[(not (eq? stype 'unix))