#lang scheme

(printf "Setting the default browser to something safe...~n")

; XXX maybe have it call /quit
(put-preferences 
 '(external-browser)
 '(("echo " . "")))