original commit: 30b41a98d4d25dbb6c98993b5fa82c0d94ddb6bb
This commit is contained in:
Robby Findler 2002-04-24 03:28:08 +00:00
parent 04ecdd4281
commit d30eb0f299

View File

@ -49,7 +49,7 @@
str))) str)))
(process*/close-ports browser-path str)))] (process*/close-ports browser-path str)))]
[(and (and (or (not preferred) [(and (and (or (not preferred)
(eq? preferred 'netscape))) (eq? preferred 'dillo)))
(find-executable-path "dillo" #f)) (find-executable-path "dillo" #f))
=> =>
(lambda (browser-path) (lambda (browser-path)