gnu: mate-polkit-for-xfce: Break circular top-level references.
Fixes <https://issues.guix.gnu.org/61911>. Reported by Maxime Devos <maximedevos@telenet.be>. * gnu/packages/xfce.scm (mate-polkit-for-xfce): Move to... * gnu/packages/mate.scm (mate-polkit-for-xfce): ... here.master
parent
f88a0bb0db
commit
0d96387527
|
@ -1470,6 +1470,23 @@ MATE Desktop to monitor your system resources and usage.")
|
|||
used to bring up authentication dialogs.")
|
||||
(license license:lgpl2.1)))
|
||||
|
||||
(define-public mate-polkit-for-xfce
|
||||
(package/inherit mate-polkit
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'install 'patch-desktop
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((common (string-append
|
||||
(assoc-ref outputs "out") "/etc/xdg/autostart/"
|
||||
"polkit-mate-authentication-agent-"))
|
||||
(old (string-append common "1.desktop"))
|
||||
(new (string-append common "for-xfce-1.desktop")))
|
||||
(substitute* old (("MATE;") "XFCE;"))
|
||||
;; To avoid a conflict if both MATE and XFCE are installed.
|
||||
(rename-file old new)))))))
|
||||
(properties `((hidden? . #t)))))
|
||||
|
||||
(define-public mate
|
||||
(package
|
||||
(name "mate")
|
||||
|
|
|
@ -1152,23 +1152,6 @@ search feature works like Xfce's app finder and makes it convenient to search
|
|||
for and start applications.")
|
||||
(license gpl2+)))
|
||||
|
||||
(define-public mate-polkit-for-xfce
|
||||
(package/inherit mate-polkit
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-after 'install 'patch-desktop
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let* ((common (string-append
|
||||
(assoc-ref outputs "out") "/etc/xdg/autostart/"
|
||||
"polkit-mate-authentication-agent-"))
|
||||
(old (string-append common "1.desktop"))
|
||||
(new (string-append common "for-xfce-1.desktop")))
|
||||
(substitute* old (("MATE;") "XFCE;"))
|
||||
;; To avoid a conflict if both MATE and XFCE are installed.
|
||||
(rename-file old new)))))))
|
||||
(properties `((hidden? . #t)))))
|
||||
|
||||
(define-public xfce
|
||||
(package
|
||||
(name "xfce")
|
||||
|
|
Reference in New Issue