futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: sbcl-trivial-clipboard: Replace xclip with xsel to reduce closure size.

Browse Source 
* gnu/packages/lisp-xyz.scm (sbcl-trivial-clipboard)[inputs]: Replace xclip
with xsel.
[arguments]: Adapt reference.

This takes the closure size of cl-trivial-clipboard from 90 MiB down to 78 MiB.
This commit is contained in:
Pierre Neidhardt 2022-07-07 13:59:52 +02:00
parent ced05db048
commit 1004c54c2e
No known key found for this signature in database
GPG Key ID: 9BDCF497A4BBCC7F
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gnu/packages/lisp-xyz.scm
View File

@ -3853,7 +3853,9 @@ client and server.")
"0apkgqrscylw3hhm5x2vs0z3hz6h7zd7dl5y3wr2zl8qjpvpc80k")))) "0apkgqrscylw3hhm5x2vs0z3hz6h7zd7dl5y3wr2zl8qjpvpc80k"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(inputs (inputs
(list xclip)) ;; Pick xsel instead of xclip because its closure size is slightly
;; smaller.
(list xsel))
(native-inputs (native-inputs
(list sbcl-fiveam)) (list sbcl-fiveam))
(arguments (arguments
@ -3862,8 +3864,8 @@ client and server.")
(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"
(("\"xclip\"") (("\"xsel\"")
(string-append "\"" (assoc-ref inputs "xclip") "/bin/xclip\"")))))))) (string-append "\"" (assoc-ref inputs "xsel") "/bin/xsel\""))))))))
(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