aboutsummaryrefslogtreecommitdiff
path: root/src/image.lisp
diff options
context:
space:
mode:
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))))