[sawfish] accelerators for all kde-int menu-entries added customize-kde menu-entry



commit 97217a9f976efdfe4a807a3c751f5da48caa4a26
Author: Christopher Roy Bratusek <zanghar freenet de>
Date:   Sat Aug 21 19:08:20 2010 +0200

    accelerators for all kde-int menu-entries
    added customize-kde menu-entry

 lisp/sawfish/wm/integration/kde.jl |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)
---
diff --git a/lisp/sawfish/wm/integration/kde.jl b/lisp/sawfish/wm/integration/kde.jl
index 2b4f9e5..0f7e458 100644
--- a/lisp/sawfish/wm/integration/kde.jl
+++ b/lisp/sawfish/wm/integration/kde.jl
@@ -45,13 +45,15 @@
     (when menu
       (nconc menu `(()
 		    (,(_ "_KDE Help") (system "khelpcenter &"))
-		    (,(_ "KDE Website") (browser "http://www.kde.org";))))))
+		    (,(_ "KDE _Website") (browser "http://www.kde.org";))))))
 
   ;; add kde-logout menu item
   (let ((menu (assoc (_ "Sessi_on") root-menu))
         (kde-logout-cmd "qdbus org.kde.ksmserver /KSMServer org.kde.KSMServerInterface.logout"))
     (when menu
       (nconc menu `(()
+                    (,(_ "_Customize KDE") (system "systemsettings &"))
+                    ()
                     (,(_ "_Logout from KDE")
                      (system ,(concat kde-logout-cmd " 1 0 -1 &")))
                     (,(_ "_Reboot from KDE")



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