summaryrefslogtreecommitdiff
path: root/fsmgr.hs
diff options
context:
space:
mode:
Diffstat (limited to 'fsmgr.hs')
-rw-r--r--fsmgr.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/fsmgr.hs b/fsmgr.hs
index 70486a4..837293e 100644
--- a/fsmgr.hs
+++ b/fsmgr.hs
@@ -178,6 +178,13 @@ buildRoot config@DiskImageConfig{..} finalOut = do
178 in do 178 in do
179 forM_ (unpack <$> skelFiles) go 179 forM_ (unpack <$> skelFiles) go
180 forM_ (unpack <$> optionalSkelFiles) $ ignoreErrors . go 180 forM_ (unpack <$> optionalSkelFiles) $ ignoreErrors . go
181 {- 3.6 systemd unit files -}
182 let go s = do
183 target <- absPath mountpoint <&> (</> "etc/systemd/system")
184 cmd_ "mkdir -p" [target]
185 cmd_ "install --preserve-timestamps -m644 -t" [target] [s]
186 go :: String -> Action ()
187 in forM_ (unpack <$> unitFiles) go
181 {- 4. custom setup commands -} 188 {- 4. custom setup commands -}
182 forM_ chrootCommands $ \c -> do 189 forM_ chrootCommands $ \c -> do
183 cmd_ "chroot" [mountpoint] "/bin/sh -c" [unpack c] 190 cmd_ "chroot" [mountpoint] "/bin/sh -c" [unpack c]