diff --git a/init/lisp b/init/lisp
index f832d1fb5..68162e491 100644
--- a/init/lisp
+++ b/init/lisp
@@ -60,7 +60,7 @@ Return value is t on success, nil otherwise."
           (if (> (buffer-size) 0)
               (progn
                 ;; replace cmd-buffer w/ contents of file whose name is in cmd-buffer
-                (insert-file-contents (buffer-substring (point-min) (1- (point-max))) nil nil nil t)
+                ;; (insert-file-contents (buffer-substring (point-min) (1- (point-max))) nil nil nil t)
                 ;; and run it carefully.  If an error is thrown, catch it and
                 ;; propagate the fact upwards as a nil, but be sure to still
                 ;; execute cleanup below
diff --git a/shells/Lisp.lua b/shells/Lisp.lua
index 16e571e1e..1cc21cd77 100644
--- a/shells/Lisp.lua
+++ b/shells/Lisp.lua
@@ -80,9 +80,9 @@ function Lisp.expandVar(self, k, v, vType)
    v                 = tostring(v):multiEscaped()
    lineA[#lineA + 1] = "(setenv \""
    lineA[#lineA + 1] = k
-   lineA[#lineA + 1] = "\" "
+   lineA[#lineA + 1] = "\" \""
    lineA[#lineA + 1] = v
-   lineA[#lineA + 1] = ")\n"
+   lineA[#lineA + 1] = "\")\n"
    local line = concatTbl(lineA,"")
    stdout:write(line)
    if (k:find('^_ModuleTable') == nil) then