diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-25 15:50:01 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-25 15:50:01 -0700 |
| commit | 6cd38e86ed9c131150efe081896eeacec4a0db0e (patch) | |
| tree | 8e54e536dbc4f71e998b497443538f97cd7aa7eb /src/connection | |
| parent | 5967d67e2650ee100dce46eb377d77f61e2265ac (diff) | |
| download | consfigurator-6cd38e86ed9c131150efe081896eeacec4a0db0e.tar.gz | |
drop two unnecessary package name qualifications
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
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))) |