avoid the extra shell on osx

svn: r8447

original commit: 9a34a06070

collects/net/sendurl.ss

@@ -80,8 +80,10 @@
                              stype)])])
   (void))
 
+(define osascript (delay (find-executable-path "osascript" #f)))
 (define (send-url/mac url-str)
-  (browser-process (format "osascript -e 'open location \"~a\"'" url-str)))
+  (browser-process (force osascript) "-e"
+                   (format "open location \"~a\"" url-str)))
 
 (define (send-url/win url-str)
   (define (simple)