..
original commit: 8cd4fb79757fc7aeb401b3cba15f83f7b1ff6e36
This commit is contained in:
parent
b99617cf86
commit
d8eeb4bb81
|
@ -4,6 +4,7 @@
|
|||
(lib "cmdline.ss")
|
||||
"private/server.ss"
|
||||
"private/browser.ss"
|
||||
"private/start.ss"
|
||||
"private/plt-browser.ss")
|
||||
|
||||
(define launch-browser? #t)
|
||||
|
@ -57,7 +58,10 @@
|
|||
(hd-cookie->port hd-cookie))))])
|
||||
(help-desk-browser hd-cookie)
|
||||
; allow browser startup time
|
||||
(sleep 2)))
|
||||
(sleep (add1 browser-timeout))
|
||||
; starting an external browser may have failed
|
||||
; so we may have switched to the internal browser
|
||||
(set! internal-browser? (use-plt-browser?))))
|
||||
|
||||
(cond
|
||||
[internal-browser? (void)]
|
||||
|
|
Loading…
Reference in New Issue
Block a user