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:
parent
217a5b852e
commit
02139eb9b2
|
@ -285,7 +285,7 @@ run a file system check."
|
|||
|
||||
;; Update /etc/mtab.
|
||||
(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~%"
|
||||
source mount-point type options)
|
||||
(close-port port))))))
|
||||
|
|
Loading…
Reference in New Issue