use #f so the default browser will be used

svn: r17596
This commit is contained in:
Eli Barzilay 2010-01-10 16:00:35 +00:00
parent 84f55d9647
commit 995d1f0d68

View File

@ -20,10 +20,8 @@
(fw:preferences:set-default
'external-browser
(let ([ll-pref (get-preference 'external-browser (lambda () #f))])
(if (raw:browser-preference? ll-pref)
ll-pref
'firefox))
(let ([pref (get-preference 'external-browser (lambda () #f))])
(and (raw:browser-preference? pref) pref))
raw:browser-preference?)
(define http-proxy-preference 'plt:http-proxy)