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

fix Open URL browse button

Browse Source 
svn: r1464
This commit is contained in:
Matthew Flatt 2005-12-01 20:07:34 +00:00
parent b41c9de014
commit 7c588937ae
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/help/private/gui.ss
View File

@ -551,7 +551,7 @@
(lambda (b e)
(let ([f (get-file)])
(when f
(send t set-value (string-append "file:" f))
(send t set-value (string-append "file:" (path->string f)))
(update-ok))))))
(define spacer (make-object vertical-pane% p))
(define result #f)