system: 'read-boot-parameters' provides a more meaningful warning.

'system' here was bound to Guile's 'system' procedure.

* gnu/system.scm (read-boot-parameters): Fix argument for fallback
warning.
This commit is contained in:
Ludovic Courtès 2018-05-31 17:31:19 +02:00
parent 69a05eab35
commit b1059b38b2
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

View File

@ -317,8 +317,8 @@ (define device-sexp->device
(_ ;the old format
"/")))))
(x ;unsupported format
(warning (G_ "unrecognized boot parameters for '~a'~%")
system)
(warning (G_ "unrecognized boot parameters at '~a'~%")
(port-filename port))
#f)))
(define (read-boot-parameters-file system)