From 9e76b49621308e19f93b627d6fdddeb29f466f39 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Tue, 2 Oct 2012 17:34:48 +0200 Subject: fork/pipe returns #f in the child, not 0 --- scsh-process.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'scsh-process.scm') diff --git a/scsh-process.scm b/scsh-process.scm index 600f7ab..b9ca087 100644 --- a/scsh-process.scm +++ b/scsh-process.scm @@ -88,7 +88,7 @@ ;; Not needed anymore after duplication is complete. (file-close (cadr p))) pipe-pairs from-fds) - (if thunk (run-final-thunk thunk) pid)) + (if thunk (run-final-thunk thunk) #f)) (begin ; Parent (for-each (lambda (p to-fd) ;; Close sending end in parent. -- cgit v1.2.3