diff --git a/contrib/babel/lisp/langs/org-babel-screen.el b/contrib/babel/lisp/langs/org-babel-screen.el
index efeab23..1529ac0 100644
--- a/contrib/babel/lisp/langs/org-babel-screen.el
+++ b/contrib/babel/lisp/langs/org-babel-screen.el
@@ -55,7 +55,9 @@ In case you want to use a different screen than one selected by your $PATH")
 \"default\" session is be used when none is specified."
   (message "Sending source code block to interactive terminal session...")
   (save-window-excursion
-    (let ((socket (org-babel-screen-session-socketname session)))
+    (let* ((processed-params (org-babel-process-params params))
+           (session (first processed-params))
+           (socket (org-babel-screen-session-socketname session)))
       (unless socket (org-babel-prep-session:screen session params))
       (org-babel-screen-session-execute-string session body))))