diff --git a/gui-lib/racket/gui/interactive.rkt b/gui-lib/racket/gui/interactive.rkt index 75717606..a7f1fc73 100644 --- a/gui-lib/racket/gui/interactive.rkt +++ b/gui-lib/racket/gui/interactive.rkt @@ -1,12 +1,5 @@ #lang racket/gui -(let ([init-file (cleanse-path - (build-path - (find-system-path 'init-dir) - ; Cludge because (find-system-path init-path) will - ; always return .racketrc, even in gracket - (case (system-type) - [(unix macosx) ".gracketrc"] - [(windows) "gracketrc.rktl"])))]) +(let ([init-file (cleanse-path (find-graphical-system-path 'init-file))]) (when (file-exists? init-file) (load init-file)))