z572 pushed a commit to branch kde-team
in repository guix.

commit 05cca99e068d4fdfd100d4495a16fc39323032f4
Author: Zheng Junjie <[email protected]>
AuthorDate: Fri Aug 9 23:33:55 2024 +0800

    gnu: plasma-workspace: Update to 6.1.4.
    
    * gnu/packages/kde-plasma.scm (plasma-workspace): Update to 6.1.4.
    [arguments]<#:phases>: Add add-span-header phase.
    
    Change-Id: Ifc5e82532b569148ab00ab2f1463c65fa507d73d
---
 gnu/packages/kde-plasma.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/kde-plasma.scm b/gnu/packages/kde-plasma.scm
index b70d5aa3ab..7c5efa41ea 100644
--- a/gnu/packages/kde-plasma.scm
+++ b/gnu/packages/kde-plasma.scm
@@ -2698,14 +2698,14 @@ sensors, process information and other system 
resources.")
 (define-public plasma-workspace
   (package
     (name "plasma-workspace")
-    (version "6.1.3")
+    (version "6.1.4")
     (source (origin
               (method url-fetch)
               (uri (string-append "mirror://kde/stable/plasma/" version
                                   "/" name "-" version ".tar.xz"))
               (sha256
                (base32
-                "1jnmqj16ivi2qv3q9i5fggknaw85drf216ml7ckvfvc5abxxx73r"))))
+                "0mlddkjxq7p01wgy8pzp65fhg1sihibzd32wn3s3zcn077frj86b"))))
     (build-system qt-build-system)
     (native-inputs (list extra-cmake-modules kdoctools pkg-config qtsvg
                          qttools
@@ -2824,6 +2824,12 @@ sensors, process information and other system 
resources.")
                              "/libexec/kglobalacceld"))
            #:phases
            #~(modify-phases %standard-phases
+               (add-after 'unpack 'add-span-header
+                 (lambda _
+                   (substitute* "xembed-sni-proxy/sniproxy.cpp"
+                     (("#include \"sniproxy.h\"")
+                      (string-append "#include \"sniproxy.h\"
+#include <span>")))))
                (add-after 'unpack 'patch-workspace-bins
                  (lambda* (#:key inputs #:allow-other-keys)
                    (let ((xmessage (search-input-file inputs "/bin/xmessage"))

Reply via email to