ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 05:18:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

system: Avoid '_' as a pattern variable in 'match'.

Browse source 
* gnu/system.scm (operating-system-root-file-system): Don't use '_' as a
wildcard in 'match', to cope with literal semantics in 2.2.
This commit is contained in:
Ludovic Courtès 2017-03-10 14:41:00 +01:00
parent fe2b6434f0
commit 856be82323
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gnu/system.scm
View file

@ -652,8 +652,8 @@ (define* (operating-system-profile os #:key container?)
(define (operating-system-root-file-system os)
"Return the root file system of OS."
(find (match-lambda
(($ <file-system> _ _ "/") #t)
(_ #f))
(($ <file-system> device title "/") #t)
(x #f))
(operating-system-file-systems os)))
(define (operating-system-initrd-file os)