From 9b606c973c3cf08217a805dbd453952eec9df5b1 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 12 Sep 2021 14:59:34 -0700 Subject: IMAGE-DUMPED: fix call to OSICAT-POSIX:CHMOD Signed-off-by: Sean Whitton --- src/image.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/image.lisp') 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)))) -- cgit v1.2.3