37 lines
1.3 KiB
Scheme
37 lines
1.3 KiB
Scheme
|
(define-module (ajatt packages suckless)
|
||
|
|
#:use-module (gnu packages xorg)
|
||
|
|
#:use-module (guix gexp)
|
||
|
|
#:use-module (guix download)
|
||
|
|
#:use-module (guix build-system gnu)
|
||
|
|
#:use-module (guix packages)
|
||
|
|
#:use-module (guix utils)
|
||
|
|
#:use-module ((guix licenses) #:prefix license:))
|
||
|
|
|
||
|
|
(define-public sselp
|
||
|
|
(package
|
||
|
|
(name "sselp")
|
||
|
|
(version "0.2")
|
||
|
|
(source (origin
|
||
|
|
(method url-fetch)
|
||
|
|
(uri (string-append "https://dl.suckless.org/tools"
|
||
|
|
"/sselp" version ".tar.gz"))
|
||
|
|
(sha256
|
||
|
|
(base32
|
||
|
|
"0k8fvf9g27yyaqpyhk6apbkq6r4vjwxhff1qb9ignxx2yvxy7qdf"))))
|
||
|
|
(build-system gnu-build-system)
|
||
|
|
(arguments
|
||
|
|
(list #:tests? #f
|
||
|
|
#:make-flags
|
||
|
|
#~(list (string-append "CC=" #$(cc-for-target))
|
||
|
|
(string-append "PREFIX=" %output))
|
||
|
|
#:phases #~(modify-phases %standard-phases
|
||
|
|
(delete 'configure))))
|
||
|
|
(inputs
|
||
|
|
(list libxrandr))
|
||
|
|
(synopsis "Simple X selection printer to stdout.")
|
||
|
|
(description "Simple X selection printer. Prints the X selection to stdout.
|
||
|
|
Useful for scripts where you can query the X selection without pressing mouse
|
||
|
|
Button2 in cumbersome ways.")
|
||
|
|
(home-page "https://tools.suckless.org/x/sselp/")
|
||
|
|
(license license:expat)))
|