From 9b9a5e3283168463545588f83748bb36411e68fe Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Sun, 18 Nov 2018 12:22:50 +0900 Subject: 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(-) (limited to 'gnu/installer') diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm index 3d9fd69bee..23b737ddf0 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) -- cgit v1.2.3