all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* [bug#65226] [PATCH] gnu: scsh: Fix version number and use gexps.
@ 2023-08-11 11:39 Andrew Whatson via Guix-patches via
  2023-08-11 11:48 ` [bug#65226] [PATCH v2] " Andrew Whatson via Guix-patches via
  0 siblings, 1 reply; 3+ messages in thread
From: Andrew Whatson via Guix-patches via @ 2023-08-11 11:39 UTC (permalink / raw)
  To: 65226; +Cc: Andrew Whatson

* gnu/packages/shells.scm (scsh)[version] Use latest upstream commit.
Use git-version.  Correct base version number to 0.7.
[arguments]: Use gexps and remove trailing #t in phases.
---
 gnu/packages/shells.scm | 30 +++++++++++++++---------------
 1 file changed, 15 insertions(+), 15 deletions(-)

diff --git a/gnu/packages/shells.scm b/gnu/packages/shells.scm
index aef22efd01..ca0f4c9ee0 100644
--- a/gnu/packages/shells.scm
+++ b/gnu/packages/shells.scm
@@ -602,11 +602,11 @@ (define-public xonsh
     (license license:bsd-2)))
 
 (define-public scsh
-  (let ((commit "114432435e4eadd54334df6b37fcae505079b49f")
-        (revision "1"))
+  (let ((commit "4acf6e4ed7b65b46186ef0c9c2a1e10bef8dc052")
+        (revision "0"))
     (package
       (name "scsh")
-      (version (string-append "0.0.0-" revision "." (string-take commit 7)))
+      (version (git-version "0.7" revision commit))
       (source
        (origin
          (method git-fetch)
@@ -616,22 +616,22 @@ (define-public scsh
          (file-name (string-append name "-" version "-checkout"))
          (sha256
           (base32
-           "1ghk08akiz7hff1pndi8rmgamgcrn2mv9asbss9l79d3c2iaav3q"))
+           "1czrp808v5gs0ci5lmkp3wr3gfkrb3vd5b2iw2hz1bpqgaf6bxpv"))
          (patches (search-patches "scsh-nonstring-search-path.patch"))))
       (build-system gnu-build-system)
       (arguments
-       `(#:test-target "test"
-         #:phases
-         (modify-phases %standard-phases
-           (add-before 'configure 'replace-rx
-             (lambda* (#:key inputs #:allow-other-keys)
-               (let* ((rx (assoc-ref inputs "scheme48-rx"))
-                      (rxpath (string-append rx "/share/scheme48-"
-                                             ,(package-version scheme48)
+       (list
+        #:test-target "test"
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-before 'configure 'replace-rx
+              (lambda _
+                (let ((rxpath (string-append #$scheme48-rx
+                                             "/share/scheme48-"
+                                             #$(package-version scheme48)
                                              "/rx")))
-                 (delete-file-recursively "rx")
-                 (symlink rxpath "rx"))
-               #t)))))
+                  (delete-file-recursively "rx")
+                  (symlink rxpath "rx")))))))
       (inputs
        (list scheme48 scheme48-rx))
       (native-inputs

base-commit: ad4520b92662e42d7d0b1e648b2068300dbb95c8
-- 
2.41.0






^ permalink raw reply related	[flat|nested] 3+ messages in thread

* [bug#65226] [PATCH v2] gnu: scsh: Fix version number and use gexps.
  2023-08-11 11:39 [bug#65226] [PATCH] gnu: scsh: Fix version number and use gexps Andrew Whatson via Guix-patches via
@ 2023-08-11 11:48 ` Andrew Whatson via Guix-patches via
  2023-08-12 21:14   ` bug#65226: [PATCH] " Ludovic Courtès
  0 siblings, 1 reply; 3+ messages in thread
From: Andrew Whatson via Guix-patches via @ 2023-08-11 11:48 UTC (permalink / raw)
  To: 65226; +Cc: Andrew Whatson

* gnu/packages/shells.scm (scsh)[version] Use latest upstream commit.
Use git-version.  Correct base version number to 0.7.
[source]: Use git-file-name.
[arguments]: Use gexps and remove trailing #t in phases.
---
 gnu/packages/shells.scm | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/gnu/packages/shells.scm b/gnu/packages/shells.scm
index aef22efd01..62b682496e 100644
--- a/gnu/packages/shells.scm
+++ b/gnu/packages/shells.scm
@@ -602,36 +602,36 @@ (define-public xonsh
     (license license:bsd-2)))
 
 (define-public scsh
-  (let ((commit "114432435e4eadd54334df6b37fcae505079b49f")
-        (revision "1"))
+  (let ((commit "4acf6e4ed7b65b46186ef0c9c2a1e10bef8dc052")
+        (revision "0"))
     (package
       (name "scsh")
-      (version (string-append "0.0.0-" revision "." (string-take commit 7)))
+      (version (git-version "0.7" revision commit))
       (source
        (origin
          (method git-fetch)
          (uri (git-reference
                (url "https://github.com/scheme/scsh")
                (commit commit)))
-         (file-name (string-append name "-" version "-checkout"))
+         (file-name (git-file-name name version))
          (sha256
           (base32
-           "1ghk08akiz7hff1pndi8rmgamgcrn2mv9asbss9l79d3c2iaav3q"))
+           "1czrp808v5gs0ci5lmkp3wr3gfkrb3vd5b2iw2hz1bpqgaf6bxpv"))
          (patches (search-patches "scsh-nonstring-search-path.patch"))))
       (build-system gnu-build-system)
       (arguments
-       `(#:test-target "test"
-         #:phases
-         (modify-phases %standard-phases
-           (add-before 'configure 'replace-rx
-             (lambda* (#:key inputs #:allow-other-keys)
-               (let* ((rx (assoc-ref inputs "scheme48-rx"))
-                      (rxpath (string-append rx "/share/scheme48-"
-                                             ,(package-version scheme48)
+       (list
+        #:test-target "test"
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-before 'configure 'replace-rx
+              (lambda _
+                (let ((rxpath (string-append #$scheme48-rx
+                                             "/share/scheme48-"
+                                             #$(package-version scheme48)
                                              "/rx")))
-                 (delete-file-recursively "rx")
-                 (symlink rxpath "rx"))
-               #t)))))
+                  (delete-file-recursively "rx")
+                  (symlink rxpath "rx")))))))
       (inputs
        (list scheme48 scheme48-rx))
       (native-inputs

base-commit: ad4520b92662e42d7d0b1e648b2068300dbb95c8
-- 
2.41.0






^ permalink raw reply related	[flat|nested] 3+ messages in thread

* bug#65226: [PATCH] gnu: scsh: Fix version number and use gexps.
  2023-08-11 11:48 ` [bug#65226] [PATCH v2] " Andrew Whatson via Guix-patches via
@ 2023-08-12 21:14   ` Ludovic Courtès
  0 siblings, 0 replies; 3+ messages in thread
From: Ludovic Courtès @ 2023-08-12 21:14 UTC (permalink / raw)
  To: Andrew Whatson; +Cc: 65226-done

Hi,

Andrew Whatson <whatson@tailcall.au> skribis:

> * gnu/packages/shells.scm (scsh)[version] Use latest upstream commit.
> Use git-version.  Correct base version number to 0.7.
> [source]: Use git-file-name.
> [arguments]: Use gexps and remove trailing #t in phases.

Applied, thanks!

Ludo’.




^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2023-08-12 21:15 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2023-08-11 11:39 [bug#65226] [PATCH] gnu: scsh: Fix version number and use gexps Andrew Whatson via Guix-patches via
2023-08-11 11:48 ` [bug#65226] [PATCH v2] " Andrew Whatson via Guix-patches via
2023-08-12 21:14   ` bug#65226: [PATCH] " Ludovic Courtès

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.