amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: sbcl-cmd: Update to 20210117.

Browse source 
* gnu/packages/lisp-xyz.scm (sbcl-cmd): Update to 20210117.
[inputs]: Add coreutils.
[arguments]: Fix `pwd' and `env' paths.
This commit is contained in:
Pierre Neidhardt 2021-01-22 12:32:02 +01:00
parent 30ec5e5a1e
commit 7f29d77806
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 15 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/lisp-xyz.scm
View file

@ -53,6 +53,7 @@
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (guix build-system asdf) #:use-module (guix build-system asdf)
#:use-module (guix build-system trivial) #:use-module (guix build-system trivial)
#:use-module (gnu packages base)
#:use-module (gnu packages c) #:use-module (gnu packages c)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages databases) #:use-module (gnu packages databases)
@ -13198,10 +13199,10 @@ standard library.")
(sbcl-package->cl-source-package sbcl-shlex)) (sbcl-package->cl-source-package sbcl-shlex))
(define-public sbcl-cmd (define-public sbcl-cmd
(let ((commit "8e68274a935ae61f38d3309c08765d8a49d09c1f")) (let ((commit "e6a54dbf660bf229c80abc124fa47e7bb6d20c93"))
(package (package
(name "sbcl-cmd") (name "sbcl-cmd")
(version (git-version "0.0.1" "1" commit)) (version (git-version "0.0.1" "2" commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@ -13210,13 +13211,24 @@ standard library.")
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "06bwwhy7wmk6fpjrqj1bfscn8rnmk8z9kwc00adp8iq6w5yjsbbj")))) (base32 "1i0l8ci4cnkx84q4afmpkq51nxah24fqpi6k9kgjbxz6li3zp8hy"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(inputs (inputs
`(("alexandria" ,sbcl-alexandria) `(("alexandria" ,sbcl-alexandria)
("coreutils" ,coreutils)
("serapeum" ,sbcl-serapeum) ("serapeum" ,sbcl-serapeum)
("shlex" ,sbcl-shlex) ("shlex" ,sbcl-shlex)
("trivia" ,sbcl-trivia))) ("trivia" ,sbcl-trivia)))
(arguments
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(let ((source (assoc-ref inputs "source"))
(bin (string-append (assoc-ref inputs "coreutils") "/bin")))
(substitute* (string-append "cmd.lisp")
(("\"env\"") (format #f "\"~a/env\"" bin))
(("\"pwd\"") (format #f "\"~a/pwd\"" bin)))))))))
(home-page "https://github.com/ruricolist/cmd") (home-page "https://github.com/ruricolist/cmd")
(synopsis "Conveniently run external programs from Common Lisp") (synopsis "Conveniently run external programs from Common Lisp")
(description (description