diff options
| author | Guillaume Le Vaillant <glv@posteo.net> | 2020-11-30 14:56:59 +0100 |
|---|---|---|
| committer | Guillaume Le Vaillant <glv@posteo.net> | 2020-11-30 15:00:27 +0100 |
| commit | 275fcffc9b5f4deb516c510b26b07c13d6e47307 (patch) | |
| tree | 486c660943542d4e309c214487353ae7df65a7ae | |
| parent | f6c827c1c9ecc3dedd584d47d05ed6faa24e33ab (diff) | |
| download | guix-275fcffc9b5f4deb516c510b26b07c13d6e47307.tar.gz | |
gnu: Add sbcl-stumpwm-screenshot.
* gnu/packages/wm.scm (sbcl-stumpwm-screenshot): New variable.
| -rw-r--r-- | gnu/packages/wm.scm | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/gnu/packages/wm.scm b/gnu/packages/wm.scm index 36eb58b713..653af37de7 100644 --- a/gnu/packages/wm.scm +++ b/gnu/packages/wm.scm @@ -1965,6 +1965,33 @@ layouts in StumpWM.") one in Emacs.") (license license:gpl3+))) +(define-public sbcl-stumpwm-screenshot + (package + (inherit stumpwm-contrib) + (name "sbcl-stumpwm-screenshot") + (inputs + `(("stumpwm" ,stumpwm "lib") + ("zpng" ,sbcl-zpng))) + (arguments + '(#:asd-systems '("screenshot") + #:tests? #f + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'chdir + (lambda _ + (chdir "util/screenshot"))) + (add-after 'chdir 'fix-build + (lambda _ + (substitute* "screenshot.asd" + (("#:zpng") + "#:stumpwm #:zpng"))))))) + (home-page + "https://github.com/stumpwm/stumpwm-contrib/tree/master/util/screenshot") + (synopsis "Screenshots for StumpWM") + (description "This StumpWM module can take screenshots and store them as +PNG files.") + (license license:gpl3+))) + (define-public lemonbar (let ((commit "35183ab81d2128dbb7b6d8e119cc57846bcefdb4") (revision "1")) |