diff options
Diffstat (limited to 'src/connection')
| -rw-r--r-- | src/connection/chroot.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection/chroot.lisp b/src/connection/chroot.lisp index 2d8b242..180858c 100644 --- a/src/connection/chroot.lisp +++ b/src/connection/chroot.lisp @@ -141,7 +141,7 @@ should be the mount point, without the chroot's root prefixed.") (unless (zerop (chroot (slot-value connection 'into))) (error "chroot(2) failed!")) (let ((home (connection-connattr connection :remote-home))) - (setf (uiop:getenv "HOME") (unix-namestring home)) + (setf (getenv "HOME") (unix-namestring home)) ;; chdir, else our current working directory is a pointer to something ;; outside the chroot (uiop:chdir home))) |