guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

13/20: installer: Replace run-command by invoke in newt/page.scm.


From: guix-commits
Subject: 13/20: installer: Replace run-command by invoke in newt/page.scm.
Date: Wed, 2 Feb 2022 10:47:06 -0500 (EST)

mothacehe pushed a commit to branch master
in repository guix.

commit ed6567abbf01a3e554c7a1d7ece31ab5f6f39ea6
Author: Josselin Poiret <dev@jpoiret.xyz>
AuthorDate: Sat Jan 15 14:50:05 2022 +0100

    installer: Replace run-command by invoke in newt/page.scm.
    
    * gnu/installer/newt/page.scm (edit-file): Replace it.
    
    Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
---
 gnu/installer/newt/page.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gnu/installer/newt/page.scm b/gnu/installer/newt/page.scm
index 9c684a3899..695c7d875f 100644
--- a/gnu/installer/newt/page.scm
+++ b/gnu/installer/newt/page.scm
@@ -22,6 +22,7 @@
   #:use-module (gnu installer steps)
   #:use-module (gnu installer utils)
   #:use-module (gnu installer newt utils)
+  #:use-module (guix build utils)
   #:use-module (guix i18n)
   #:use-module (ice-9 i18n)
   #:use-module (ice-9 match)
@@ -727,8 +728,7 @@ ITEMS when 'Ok' is pressed."
   (newt-suspend)
   ;; Use Nano because it syntax-highlights Scheme by default.
   ;; TODO: Add a menu to choose an editor?
-  (run-command (list "/run/current-system/profile/bin/nano" file)
-               #:locale locale)
+  (invoke "nano" file)
   (newt-resume))
 
 (define* (run-file-textbox-page #:key



reply via email to

[Prev in Thread] Current Thread [Next in Thread]