From b9fd5383ff401bbc4043c00aba2bb0d4dbb230c5 Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Thu, 24 Dec 2020 09:56:46 -0800
Subject: [PATCH] Fix typo in environment variable name that broke interprocess
 communications (issue Interlisp/medley#106)

---
 src/unixfork.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/unixfork.c b/src/unixfork.c
index 04c806f4..a08c996b 100644
--- a/src/unixfork.c
+++ b/src/unixfork.c
@@ -271,7 +271,7 @@ int fork_Unix() {
     char tempstring[30];
 
     snprintf(tempstring, sizeof(tempstring), "%d", UnixToLisp[0]);
-    setenv("LDEPIPEINE", tempstring, 1);
+    setenv("LDEPIPEIN", tempstring, 1);
 
     snprintf(tempstring, sizeof(tempstring), "%d", LispToUnix[1]);
     setenv("LDEPIPEOUT", tempstring, 1);