aboutsummaryrefslogtreecommitdiff
path: root/src/connection.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/connection.lisp')
-rw-r--r--src/connection.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection.lisp b/src/connection.lisp
index b2b0cac..7dbe5d3 100644
--- a/src/connection.lisp
+++ b/src/connection.lisp
@@ -289,7 +289,7 @@ which will be cleaned up when BODY is finished."
#?"umask 077; echo 'mkstemp(${template})' 2>/dev/null | m4 2>/dev/null || mktemp '${template}'"
nil)
(let ((lines (lines out)))
- (if (and (zerop exit) lines)
+ (if (and (zerop exit) lines (plusp (length (car lines))))
(car lines)
(error 'run-failed
:cmd "(attempt to make a temporary file on remote)"