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

internal browser support

Browse Source 
original commit: 5d0d8f1d417176b2ebb28b7f5435fc89783f7790
This commit is contained in:
Paul Graunke 2002-09-20 17:20:25 +00:00
parent 866e43cf4c
commit b8aaed8f42
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/net/sendurl.ss
View File

@ -11,7 +11,7 @@
; : any -> bool ; : any -> bool
(define (browser-preference? x) (define (browser-preference? x)
(or (not x) (memq x unix-browser-list) (custom-browser? x) (or (not x) (eq? 'plt x) (memq x unix-browser-list) (custom-browser? x)
(procedure? x))) (procedure? x)))
(define external-browser (define external-browser