[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: installer: Remove some more double slashes from "time zone" page.
From: |
Danny Milosavljevic |
Subject: |
01/01: installer: Remove some more double slashes from "time zone" page. |
Date: |
Sun, 9 Jul 2017 20:27:04 -0400 (EDT) |
dannym pushed a commit to branch wip-installer-2
in repository guix.
commit 8d6af49655343c3eac25dcd13fe72d15fd3ce608
Author: Danny Milosavljevic <address@hidden>
Date: Mon Jul 10 02:25:58 2017 +0200
installer: Remove some more double slashes from "time zone" page.
* gnu/system/installer/time-zone.scm (time-zone-page-activate-item): Remove
some more double slashes.
---
gnu/system/installer/time-zone.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/gnu/system/installer/time-zone.scm
b/gnu/system/installer/time-zone.scm
index 3957d29..f66a782 100644
--- a/gnu/system/installer/time-zone.scm
+++ b/gnu/system/installer/time-zone.scm
@@ -54,14 +54,14 @@
(let ((p (make-tz-browser page new-dir)))
(page-set-datum! p 'stem
(if (page-datum page 'stem)
- (string-append (page-datum page 'stem) "/" i)
+ (string-append (page-datum page 'stem) i)
i))
(page-pop) ; Don't go back to the current page!
(page-enter p))
(begin
(set! time-zone
(if (page-datum page 'stem)
- (string-append (page-datum page 'stem) "/" i)
+ (string-append (page-datum page 'stem) i)
i))
(page-leave)
#f))))