ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-14 19:05:10 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: sbcl-trivial-clipboard: Update to 20210219.

Browse source 
* gnu/packages/lisp-xyz.scm (sbcl-trivial-clipboard): Update to 20210219.
This commit is contained in:
Pierre Neidhardt 2021-02-23 09:12:23 +01:00
parent a239237b2f
commit bdf7296666
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 5 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -3563,10 +3563,10 @@ (define-public cl-trivial-arguments
(sbcl-package->cl-source-package sbcl-trivial-arguments)) (sbcl-package->cl-source-package sbcl-trivial-arguments))
(define-public sbcl-trivial-clipboard (define-public sbcl-trivial-clipboard
(let ((commit "afcd3743b842f5a81fc86dba60f9db59970f49c5")) (let ((commit "8a580cb97196be7cf096548eb1f46794cd22bb39"))
(package (package
(name "sbcl-trivial-clipboard") (name "sbcl-trivial-clipboard")
(version (git-version "0.0.0.0" "3" commit)) (version (git-version "0.0.0.0" "4" commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@ -3576,7 +3576,7 @@ (define-public sbcl-trivial-clipboard
(file-name (git-file-name "trivial-clipboard" version)) (file-name (git-file-name "trivial-clipboard" version))
(sha256 (sha256
(base32 (base32
"1qfbvkzmvkbqpc5s3sx31c5653sy6qlcixafgzd10qpykb843prr")))) "0apkgqrscylw3hhm5x2vs0z3hz6h7zd7dl5y3wr2zl8qjpvpc80k"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(inputs (inputs
`(("xclip" ,xclip))) `(("xclip" ,xclip)))
@ -3588,10 +3588,8 @@ (define-public sbcl-trivial-clipboard
(add-after 'unpack 'fix-paths (add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/text.lisp" (substitute* "src/text.lisp"
(("\\(executable-find \"xclip\"\\)") (("\"xclip\"")
(string-append "(executable-find \"" (string-append "\"" (assoc-ref inputs "xclip") "/bin/xclip\""))))))))
(assoc-ref inputs "xclip")
"/bin/xclip\")"))))))))
(home-page "https://github.com/snmsts/trivial-clipboard") (home-page "https://github.com/snmsts/trivial-clipboard")
(synopsis "Access system clipboard in Common Lisp") (synopsis "Access system clipboard in Common Lisp")
(description (description