|
From: | GNU bug Tracking System |
Subject: | [debbugs-tracker] bug#27180: closed ([PATCH core-updates] utils: Add helper method to invoke programs.) |
Date: | Thu, 01 Jun 2017 17:10:02 +0000 |
Your message dated Thu, 1 Jun 2017 19:09:00 +0200 with message-id <address@hidden> and subject line Re: bug#27180: [PATCH core-updates] utils: Add helper method to invoke programs. has caused the debbugs.gnu.org bug report #27180, regarding [PATCH core-updates] utils: Add helper method to invoke programs. to be marked as done. (If you believe you have received this mail in error, please contact address@hidden) -- 27180: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=27180 GNU Bug Tracking System Contact address@hidden with problems
--- Begin Message ---Subject: [PATCH core-updates] utils: Add helper method to invoke programs. Date: Thu, 1 Jun 2017 09:22:07 +0200 * guix/build/utils.scm (invoke): New variable. --- guix/build/utils.scm | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/guix/build/utils.scm b/guix/build/utils.scm index 6d3c29d00..b2307d9d6 100644 --- a/guix/build/utils.scm +++ b/guix/build/utils.scm @@ -84,6 +84,7 @@ fold-port-matches remove-store-references wrap-program + invoke locale-category->string)) @@ -1058,6 +1059,13 @@ with definitions for VARS." (chmod prog-tmp #o755) (rename-file prog-tmp prog)))) +(define invoke + "Invokes the program (array-ref ARGS 0) and gives it ARGS. + If the exit code is non-zero, raises an error." + (lambda args + (if (not (zero? (system* args))) + (error (format #f "Failed to invoke ~a" args))))) + ;;; ;;; Locales.
--- End Message ---
--- Begin Message ---Subject: Re: bug#27180: [PATCH core-updates] utils: Add helper method to invoke programs. Date: Thu, 1 Jun 2017 19:09:00 +0200 Good idea to end it with #t :) Pushed your variant as 3f65c190d23296e7e718c3deff413e8beb61d8ba to core-updates.
--- End Message ---
[Prev in Thread] | Current Thread | [Next in Thread] |