From 1bbb2344d7008bf5c0de15ec2b22679d1a67c54b Mon Sep 17 00:00:00 2001
From: Larry Masinter <LMM@acm.org>
Date: Mon, 30 Nov 2020 11:14:23 -0800
Subject: [PATCH] Didn't expand ~ for lisp.virtualmem

---
 run-medley | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/run-medley b/run-medley
index c5c412fd..8699fe6c 100755
--- a/run-medley
+++ b/run-medley
@@ -5,7 +5,7 @@
 #                    [--display X_DISPLAY]      \
 #                    [--vmfile FILE]            \
 #                    [--nogreet | --greet FILE] \
-#                    [--load URL_OR_FILE]
+#                    [URL_OR_FILE]
 
 # Directory variables are accessible from Lisp via UNIX-GETENV
 # LDESRCESYSOUT         SYSOUT full-file name you want to run
@@ -35,7 +35,7 @@ geometry="-g 1440x900"
 screensize="-sc 1440x900"
 passthrough_args=""
 
-export LDEDESTSYSOUT="~/lisp.virtualmem"
+export LDEDESTSYSOUT=~/lisp.virtualmem
 export LDEINIT="$MEDLEYDIR/greetfiles/SIMPLE-INIT"
 export LDEKBDTYPE=x
 
@@ -61,7 +61,7 @@ while [ "$#" -ne 0 ]; do
             shift
             ;;
     	"-vmem" | "--vmem" | "-vmfile" )
-	    LDEDESTSYSOUT="$2"
+	    export LDEDESTSYSOUT="$2"
 	    shift
 	    ;;
 	"-full")