diff --git a/scsh/scsh-interfaces.scm b/scsh/scsh-interfaces.scm
index 5d3864c..94e91a4 100644
--- a/scsh/scsh-interfaces.scm
+++ b/scsh/scsh-interfaces.scm
@@ -163,7 +163,7 @@
 			      with-region-lock*
 			      (with-region-lock :syntax)
 
-			      fork-job/pty
+			      fork-pty-session
 			      open-pty
 			      pty-name->tty-name
 			      tty-name->pty-name