diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index b8d93f237..97d0100f4 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -417,10 +417,10 @@ then run `org-babel-load-in-session'."
 (defun org-babel-pop-to-session-maybe ()
   "Conditionally pop to a session.
 Detect if this is context for a org-babel src-block and if so
-then run `org-babel-pop-to-session'."
+then run `org-babel-switch-to-session'."
   (interactive)
   (let ((info (org-babel-get-src-block-info)))
-    (if info (progn (org-babel-pop-to-session current-prefix-arg info) t) nil)))
+    (if info (progn (org-babel-switch-to-session current-prefix-arg info) t) nil)))
 
 (add-hook 'org-metadown-hook 'org-babel-pop-to-session-maybe)