06/18: installer: Use _ instead of M_ for host-name-refresh.

[John Darrington]

jmd pushed a commit to branch wip-installer
in repository guix.

commit 8a2baad07d768fde22bb02923c047c397bbf3b47
Author: John Darrington <address@hidden>
Date:   Mon Jan 30 18:59:37 2017 +0100

    installer: Use _ instead of M_ for host-name-refresh.
    
    * gnu/system/installer/hostname.scm (host-name-refresh): Use _ from
    guix/ui.scm instead of M_
---
 gnu/system/installer/hostname.scm |    7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/gnu/system/installer/hostname.scm 
b/gnu/system/installer/hostname.scm
index a319d5f..62809cb 100644
--- a/gnu/system/installer/hostname.scm
+++ b/gnu/system/installer/hostname.scm
@@ -20,6 +20,7 @@
   #:use-module (gnu system installer page)
   #:use-module (gnu system installer misc)
   #:use-module (gnu system installer utils)
+  #:use-module (guix ui)
   #:use-module (gurses form)
   #:use-module (gurses buttons)
   #:use-module (ncurses curses)
@@ -59,8 +60,10 @@
     (clear text-window)
     (addstr*
      text-window
-     (gettext
-      (format #f "Enter the host name for the new system.  Only letters, 
digits and hyphens are allowed. The first character may not be a hyphen.  A 
maximum of ~a characters are allowed." max-length)))
+      (format
+       #f
+       (_ "Enter the host name for the new system.  Only letters, digits and 
hyphens are allowed. The first character may not be a hyphen.  A maximum of ~a 
characters are allowed.")
+       max-length))
     (refresh* text-window)
     (refresh* (outer (page-wwin page)))
     (refresh* (form-window form))))