[sawfish] added logout, reboot, shutdown entries to kde-int

[Christopher Bratusek <chrisb src gnome org>]

commit 4698f6405913ae2705752ae22a62df79e499e67f
Author: chrisb <zanghar freenet de>
Date:   Mon Sep 7 19:44:43 2009 +0200

    added logout, reboot, shutdown entries to kde-int

 ChangeLog                          |    2 ++
 lisp/sawfish/wm/integration/kde.jl |   15 ++++++++-------
 2 files changed, 10 insertions(+), 7 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index a652f69..01a9dc7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -7,6 +7,8 @@
 
 	* lisp/sawfish/wm/state/maximize.jl: squashed a compiler warning
 
+	* lisp/sawfish/wm/integration/kde.jl: added logout, reboot and shutdown entries
+
 2009-09-06  Christopher Bratusek <zanghar freenet de>
 	* lisp/sawfish/wm/ext/fdo-menu.jl: Partial rewrite of fdo-menu [Matthew Love]
 
diff --git a/lisp/sawfish/wm/integration/kde.jl b/lisp/sawfish/wm/integration/kde.jl
index 37697a2..ef3e87a 100644
--- a/lisp/sawfish/wm/integration/kde.jl
+++ b/lisp/sawfish/wm/integration/kde.jl
@@ -42,12 +42,13 @@
     (when menu
       (nconc menu `(()
 		    (,(_ "_KDE Help") (system "khelpcenter &"))
-		    (,(_ "KDE Website") (browser "http://www.kde.org";)))))))
+		    (,(_ "KDE Website") (browser "http://www.kde.org";))))))
 		    ;(,(_ "About KDE") (system "false &"))))))
 
-  ;; add kde-logout menu item
-  ;(let ((menu (assoc (_ "Sessi_on") root-menu)))
-  ;  (when menu
-  ;    (nconc menu `(()
-  ;                 (,(_ "_Logout from KDE") (system "false &"))
-  ;		   (,(_ "_Shutdown from KDE") (system "false &")))))))
+  ; add kde-logout menu item
+  (let ((menu (assoc (_ "Sessi_on") root-menu)))
+    (when menu
+      (nconc menu `(()
+                   (,(_ "_Logout from KDE") (system "qdbus org.kde.ksmserver /KSMServer org.kde.KSMServerInterface.logout 1 0 -1 &"))
+  		   (,(_ "_Reboot from KDE") (system "qdbus org.kde.ksmserver /KSMServer org.kde.KSMServerInterface.logout 1 2 -1 &"))
+		   (,(_ "_Shutdown from KDE") (system "qdbus org.kde.ksmserver /KSMServer org.kde.KSMServerInterface.logout 1 2 -1 &")))))))