guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: guix-commits
Subject: 32/34: gnu: mate-control-center: Fix file name in polkit rule.
Date: Thu, 2 Apr 2020 10:07:35 -0400 (EDT)

civodul pushed a commit to branch master
in repository guix.

commit 8a5cdc078c17d3789e156b259d6b3a8335cc9a7b
Author: Ludovic Courtès <address@hidden>
AuthorDate: Thu Apr 2 15:32:38 2020 +0200

    gnu: mate-control-center: Fix file name in polkit rule.
    
    * gnu/packages/mate.scm (mate-control-center)[arguments]: New field.
---
 gnu/packages/mate.scm | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/mate.scm b/gnu/packages/mate.scm
index 6a0d024..28f6b1e 100644
--- a/gnu/packages/mate.scm
+++ b/gnu/packages/mate.scm
@@ -3,7 +3,7 @@
 ;;; Copyright © 2016, 2017 Efraim Flashner <address@hidden>
 ;;; Copyright © 2017 ng0 <address@hidden>
 ;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <address@hidden>
-;;; Copyright © 2019 Ludovic Courtès <address@hidden>
+;;; Copyright © 2019, 2020 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2019 Guy Fleury Iteriteka <address@hidden>
 ;;; Copyright © 2020 Jonathan Brielmaier <address@hidden>
 ;;;
@@ -959,6 +959,19 @@ icons on the MATE desktop.  It works on local and remote 
file systems.")
         (base32
          "192plsh83m2qz7jgakns2yvhqbj53v7i54iwb0z26i2awy0j9rcd"))))
     (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
      `(("pkg-config" ,pkg-config)
        ("intltool" ,intltool)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]