installer: newt: Locate the logo within local-file.
* gnu/installer/newt.scm (logo): Remove it, (welcome-page): Use a relative path to locate the logo.
This commit is contained in:
parent
ba32109a28
commit
9b9a5e3283
@ -57,13 +57,8 @@
|
||||
#~(lambda* (zonetab)
|
||||
(run-timezone-page zonetab)))
|
||||
|
||||
(define logo
|
||||
(string-append
|
||||
(dirname (search-path %load-path "guix.scm"))
|
||||
"/gnu/installer/aux-files/logo.txt"))
|
||||
|
||||
(define welcome-page
|
||||
#~(run-welcome-page #$(local-file logo)))
|
||||
#~(run-welcome-page #$(local-file "aux-files/logo.txt")))
|
||||
|
||||
(define menu-page
|
||||
#~(lambda (steps)
|
||||
|
Loading…
Reference in New Issue
Block a user