gnu: dunst: Build dunstify.

* gnu/packages/dunst.scm (dunst)[arguments]: Add phase install-dunstify.
[inputs]: Add libnotify.
This commit is contained in:
Brice Waegeneire 2020-02-10 09:51:48 +01:00 committed by Nicolas Goaziou
parent 56973172c9
commit 81565d23df
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D

View file

@ -2,6 +2,7 @@
;;; Copyright © 2015, 2017, 2018 Alex Kost <alezost@gmail.com>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re>
;;;
;;; This file is part of GNU Guix.
;;;
@ -26,6 +27,7 @@ (define-module (gnu packages dunst)
#:use-module (gnu packages base)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages glib)
#:use-module (gnu packages gnome)
#:use-module (gnu packages gtk)
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
@ -52,9 +54,16 @@ (define-public dunst
;; Otherwise it tries to install service file
;; to "dbus" store directory.
(string-append "SERVICEDIR_DBUS=" %output
"/share/dbus-1/services"))
"/share/dbus-1/services")
"dunstify")
#:phases (modify-phases %standard-phases
(delete 'configure))))
(delete 'configure)
(add-after 'install 'install-dunstify
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
(install-file "dunstify"
(string-append out "/bin")))
#t)))))
(native-inputs
`(("pkg-config" ,pkg-config)
("perl" ,perl) ; for pod2man
@ -65,6 +74,7 @@ (define-public dunst
("glib" ,glib)
("cairo" ,cairo)
("pango" ,pango)
("libnotify" ,libnotify) ; for dunstify
("libx11" ,libx11)
("libxscrnsaver" ,libxscrnsaver)
("libxinerama" ,libxinerama)