aboutsummaryrefslogtreecommitdiff
path: root/src/image.lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-09-12 14:59:34 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-09-12 15:03:42 -0700
commit9b606c973c3cf08217a805dbd453952eec9df5b1 (patch)
tree868ff24e6a6c0d4e9924d9b9754d55f770e12956 /src/image.lisp
parentbd046153676b70c3a1945b93897c2721c42014da (diff)
downloadconsfigurator-9b606c973c3cf08217a805dbd453952eec9df5b1.tar.gz
IMAGE-DUMPED: fix call to OSICAT-POSIX:CHMOD
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/image.lisp')
-rw-r--r--src/image.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/image.lisp b/src/image.lisp
index c1d1a48..4c09553 100644
--- a/src/image.lisp
+++ b/src/image.lisp
@@ -150,7 +150,7 @@ already running from FILENAME."
(eql :linux (uiop:operating-system))
(pathname-equal file (resolve-symlinks "/proc/self/exe")))
(unless filename
- (nix:chmod #o700 (unix-namestring (pathname-directory-pathname file))))
+ (nix:chmod (unix-namestring (pathname-directory-pathname file)) #o700))
(if form
(dump-consfigurator-in-grandchild file form)
(dump-consfigurator-in-grandchild file))))