[sawfish] accelerators for all kde-int menu-entries added customize-kde menu-entry
- From: Christopher Bratusek <chrisb src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [sawfish] accelerators for all kde-int menu-entries added customize-kde menu-entry
- Date: Sat, 21 Aug 2010 17:27:41 +0000 (UTC)
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]