ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-12 14:16:55 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

linux-initrd: Append to /etc/mtab.

Browse source 
* 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 @@ (define flags->bit-mask
;; 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))))))