all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: "Paul A. Patience" <paul@apatience.com>
To: 55182@debbugs.gnu.org
Cc: "Paul A. Patience" <paul@apatience.com>
Subject: [bug#55182] [PATCH 3/3] gnu: apl: Use G-expressions.
Date: Fri, 29 Apr 2022 11:56:56 +0000	[thread overview]
Message-ID: <20220429115646.539143-2-paul@apatience.com> (raw)
In-Reply-To: <20220429115646.539143-1-paul@apatience.com>

* gnu/packages/apl.scm (apl)[arguments]: Use G-expressions.
---
 gnu/packages/apl.scm | 37 +++++++++++++++++++------------------
 1 file changed, 19 insertions(+), 18 deletions(-)

diff --git a/gnu/packages/apl.scm b/gnu/packages/apl.scm
index 9c4b9a48e1..86a5adc90e 100644
--- a/gnu/packages/apl.scm
+++ b/gnu/packages/apl.scm
@@ -23,6 +23,7 @@ (define-module (gnu packages apl)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix git-download)
   #:use-module (guix svn-download)
+  #:use-module (guix gexp)
   #:use-module (guix packages)
   #:use-module (guix build-system gnu)
   #:use-module (gnu packages gettext)
@@ -54,24 +55,24 @@ (define-public apl
              readline
              sqlite))
       (arguments
-       `(#:configure-flags (list (string-append
-                                  "--with-sqlite3="
-                                  (assoc-ref %build-inputs "sqlite")))
-         #:phases
-         (modify-phases %standard-phases
-           (add-before 'configure 'fix-configure
-             (lambda _
-               (substitute* "buildtag.sh"
-                 ;; Don't exit on failed SVN-related calls.
-                 (("^ +return 0\n") "")
-                 ;; Manually set the SVN revision, since the directory is
-                 ;; unversioned and we know it anyway.
-                 (("^SVNINFO=.*")
-                  ,(string-append "SVNINFO=" (number->string revision) "\n"))
-                 ;; Requires running ‘svn info’ on a versioned directory.
-                 (("\\\\\"\\$ARCHIVE_SVNINFO\\\\\"") "\\\"\\\"")
-                 ;; Don't leak build information.
-                 (("\\\\\"\\$abs_srcdir\\\\\"") "\\\"\\\"")))))))
+       (list #:configure-flags #~(list (string-append
+                                        "--with-sqlite3="
+                                        #$(this-package-input "sqlite")))
+             #:phases
+             #~(modify-phases %standard-phases
+                 (add-before 'configure 'fix-configure
+                   (lambda _
+                     (substitute* "buildtag.sh"
+                       ;; Don't exit on failed SVN-related calls.
+                       (("^ +return 0\n") "")
+                       ;; Manually set the SVN revision, since the directory is
+                       ;; unversioned and we know it anyway.
+                       (("^SVNINFO=.*")
+                        (string-append "SVNINFO=" #$(number->string revision) "\n"))
+                       ;; Requires running ‘svn info’ on a versioned directory.
+                       (("\\\\\"\\$ARCHIVE_SVNINFO\\\\\"") "\\\"\\\"")
+                       ;; Don't leak build information.
+                       (("\\\\\"\\$abs_srcdir\\\\\"") "\\\"\\\"")))))))
       (synopsis "APL interpreter")
       (description
        "GNU APL is a free interpreter for the programming language APL.  It is
--
2.36.0






  reply	other threads:[~2022-04-29 11:58 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2022-04-29 11:55 [bug#55182] [PATCH 1/3] gnu: apl: Update to 1.8-r1550 Paul A. Patience
2022-04-29 11:56 ` [bug#55182] [PATCH 2/3] gnu: apl: Remove input labels Paul A. Patience
2022-04-29 11:56   ` Paul A. Patience [this message]
2022-04-29 12:57 ` [bug#55182] [PATCH 1/3] gnu: apl: Update to 1.8-r1550 Maxime Devos
2022-05-02 11:17 ` [bug#55182] [PATCH v2 0/3] " Paul A. Patience
2022-05-02 11:17   ` [bug#55182] [PATCH v2 1/3] " Paul A. Patience
2022-05-02 11:17   ` [bug#55182] [PATCH v2 2/3] gnu: apl: Remove input labels Paul A. Patience
2022-05-02 11:17   ` [bug#55182] [PATCH v2 3/3] gnu: apl: Use G-expressions Paul A. Patience
2022-05-02 12:53   ` bug#55182: [PATCH 1/3] gnu: apl: Update to 1.8-r1550 Ludovic Courtès

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20220429115646.539143-2-paul@apatience.com \
    --to=paul@apatience.com \
    --cc=55182@debbugs.gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.