diff --git a/modules/lang/scheme/autoload.el b/modules/lang/scheme/autoload.el
index f02a5720d..47d664680 100644
--- a/modules/lang/scheme/autoload.el
+++ b/modules/lang/scheme/autoload.el
@@ -69,5 +69,5 @@ property lists and names starting with 'default'."
 (defun +scheme/open-repl ()
   "Open the Scheme REPL."
   (interactive)
-  (call-interactively #'switch-to-geiser)
+  (call-interactively #'geiser-repl-switch)
   (current-buffer))
diff --git a/modules/lang/scheme/config.el b/modules/lang/scheme/config.el
index 70b014ce4..30af3bd86 100644
--- a/modules/lang/scheme/config.el
+++ b/modules/lang/scheme/config.el
@@ -30,7 +30,7 @@
   
   (map! :localleader
         (:map (scheme-mode-map geiser-repl-mode-map)
-         :desc "Toggle REPL"                  "'"  #'switch-to-geiser
+         :desc "Toggle REPL"                  "'"  #'geiser-repl-switch
          :desc "Connect to external Scheme"   "\"" #'geiser-connect
          :desc "Toggle type of brackets"      "["  #'geiser-squarify
          :desc "Insert lambda"                "\\" #'geiser-insert-lambda