nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

linux-initrd: Append to /etc/mtab. 

* guix/build/linux-initrd.scm (mount-file-system): Open /etc/mtab in
  append mode.
This commit is contained in:
Ludovic Courtès 2014-05-10 21:47:05 +02:00
parent 217a5b852e
commit 02139eb9b2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
guix/build/linux-initrd.scm
View File

@ -285,7 +285,7 @@ run a file system check."
;; Update /etc/mtab. ;; Update /etc/mtab.
(mkdir-p (string-append root "/etc")) (mkdir-p (string-append root "/etc"))
(let ((port (open-output-file (string-append root "/etc/mtab")))) (let ((port (open-file (string-append root "/etc/mtab") "a")))
(format port "~a ~a ~a ~a 0 0~%" (format port "~a ~a ~a ~a 0 0~%"
source mount-point type options) source mount-point type options)
(close-port port)))))) (close-port port))))))