diff --git a/modules/lang/ocaml/config.el b/modules/lang/ocaml/config.el
index 69ff8282d..69ce17737 100644
--- a/modules/lang/ocaml/config.el
+++ b/modules/lang/ocaml/config.el
@@ -37,7 +37,9 @@
     (set-eval-handler! 'tuareg-mode #'utop-eval-region)
     (defun +ocaml-init-utop-h ()
       (when (executable-find "utop")
-        (utop-minor-mode)))))
+        (utop-minor-mode)))
+    :config
+    (set-popup-rule! "^\\*utop\\*" :quit nil)))
 
 
 (use-package! merlin