diff --git a/collects/drscheme/private/module-language.ss b/collects/drscheme/private/module-language.ss
index 3eff00ba06..48a3199009 100644
--- a/collects/drscheme/private/module-language.ss
+++ b/collects/drscheme/private/module-language.ss
@@ -107,7 +107,7 @@
           (run-in-user-thread
            (λ ()
              (current-command-line-arguments (module-language-settings-command-line-args settings))
-             (let ([default (find-library-collection-paths)])
+             (let ([default (current-library-collection-paths)])
                (current-library-collection-paths
                 (apply 
                  append
@@ -561,4 +561,4 @@
                 [else
                  (loop (+ pos 1))]))))
         
-        (super-new)))))
\ No newline at end of file
+        (super-new)))))