[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: installer: newt: Locate the logo within local-file.
From: |
Mathieu Othacehe |
Subject: |
01/01: installer: newt: Locate the logo within local-file. |
Date: |
Sat, 17 Nov 2018 22:24:04 -0500 (EST) |
mothacehe pushed a commit to branch wip-newt-installer
in repository guix.
commit 2bc8f10a35f24ecfa9f0be6b1e26b4f7af0a275c
Author: Mathieu Othacehe <address@hidden>
Date: Sun Nov 18 12:22:50 2018 +0900
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.
---
gnu/installer/newt.scm | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm
index 3d9fd69..23b737d 100644
--- a/gnu/installer/newt.scm
+++ b/gnu/installer/newt.scm
@@ -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)