suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix dangling quote

Browse Source 
svn: r6906
This commit is contained in:
Eli Barzilay 2007-07-13 16:52:01 +00:00
parent 816d216862
commit d7e79cde81
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/net/sendurl.ss
View File

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