summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMathieu Othacehe <m.othacehe@gmail.com>2018-11-18 12:22:50 +0900
committerLudovic Courtès <ludo@gnu.org>2019-01-17 14:04:20 +0100
commit9b9a5e3283168463545588f83748bb36411e68fe (patch)
tree879ed78a06656b250310c6a1ad539c3f461effc3
parentba32109a28e7c67c748838b8f5d406ccc3983e7f (diff)
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.
-rw-r--r--gnu/installer/newt.scm7
1 files changed, 1 insertions, 6 deletions
diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm
index 3d9fd69bee1..23b737ddf09 100644
--- a/gnu/installer/newt.scm
+++ b/gnu/installer/newt.scm
@@ -57,13 +57,8 @@
57 #~(lambda* (zonetab) 57 #~(lambda* (zonetab)
58 (run-timezone-page zonetab))) 58 (run-timezone-page zonetab)))
59 59
60(define logo
61 (string-append
62 (dirname (search-path %load-path "guix.scm"))
63 "/gnu/installer/aux-files/logo.txt"))
64
65(define welcome-page 60(define welcome-page
66 #~(run-welcome-page #$(local-file logo))) 61 #~(run-welcome-page #$(local-file "aux-files/logo.txt")))
67 62
68(define menu-page 63(define menu-page
69 #~(lambda (steps) 64 #~(lambda (steps)