ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-27 21:29:17 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: mate-control-center: Fix file name in polkit rule.

Browse source 
* gnu/packages/mate.scm (mate-control-center)[arguments]: New field.
This commit is contained in:
Ludovic Courtès 2020-04-02 15:32:38 +02:00
parent ae8e0fbd82
commit 8a5cdc078c
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 14 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gnu/packages/mate.scm
View file

@ -3,7 +3,7 @@
;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017 ng0 <ng0@n0.is> ;;; Copyright © 2017 ng0 <ng0@n0.is>
;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2019, 2020 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2019 Guy Fleury Iteriteka <hoonandon@gmail.com> ;;; Copyright © 2019 Guy Fleury Iteriteka <hoonandon@gmail.com>
;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de> ;;; Copyright © 2020 Jonathan Brielmaier <jonathan.brielmaier@web.de>
;;; ;;;
@ -959,6 +959,19 @@ (define-public mate-control-center
(base32 (base32
"192plsh83m2qz7jgakns2yvhqbj53v7i54iwb0z26i2awy0j9rcd")))) "192plsh83m2qz7jgakns2yvhqbj53v7i54iwb0z26i2awy0j9rcd"))))
(build-system glib-or-gtk-build-system) (build-system glib-or-gtk-build-system)
(arguments
'(#:phases (modify-phases %standard-phases
(add-before 'build 'fix-polkit-action
(lambda* (#:key outputs #:allow-other-keys)
;; Make sure the polkit file refers to the right
;; executable.
(let ((out (assoc-ref outputs "out")))
(substitute*
'("capplets/display/org.mate.randr.policy.in"
"capplets/display/org.mate.randr.policy")
(("/usr/sbin")
(string-append out "/sbin")))
#t))))))
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config) `(("pkg-config" ,pkg-config)
("intltool" ,intltool) ("intltool" ,intltool)