03/05: gnu: lxqt-session: fix lxqt-rc.xml permission issue

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 42f3eb2e7fd6f750db32b800a9c61b3cb269457f
Author: Reza Alizadeh Majd <address@hidden>
Date:   Tue May 21 22:37:51 2019 +0430

    gnu: lxqt-session: fix lxqt-rc.xml permission issue
    
    * gnu/packages/lxqt.scm (lxqt-session): add write permission to
    lxqt-rc.xml file after initial copy to user directory
    
    Signed-off-by: Ludovic Courtès <address@hidden>
---
 gnu/packages/lxqt.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/lxqt.scm b/gnu/packages/lxqt.scm
index cac68c4..d7abd5a 100644
--- a/gnu/packages/lxqt.scm
+++ b/gnu/packages/lxqt.scm
@@ -827,6 +827,15 @@ allows for launching applications or shutting down the 
system.")
                (("DESTINATION \"\\$\\{LXQT_ETC_XDG_DIR\\}")
                 "DESTINATION \"etc/xdg"))
              #t))
+         ;; add write permission to lxqt-rc.xml file which is stored as 
read-only in store
+         (add-after 'unpack 'patch-openbox-permission
+           (lambda _
+             (substitute* "startlxqt.in"
+               (("cp \"\\$LXQT_DEFAULT_OPENBOX_CONFIG\" 
\"\\$XDG_CONFIG_HOME/openbox\"")
+                 (string-append "cp \"$LXQT_DEFAULT_OPENBOX_CONFIG\" 
\"$XDG_CONFIG_HOME/openbox\"\n"
+                                "        # fix openbox permission issue\n"
+                                "        chmod u+w  
\"$XDG_CONFIG_HOME/openbox\"/*")))
+             #t))
          (add-after 'unpack 'patch-translations-dir
            (lambda* (#:key outputs #:allow-other-keys)
              (substitute* '("lxqt-config-session/CMakeLists.txt"