[sawfish] try loading kde-int if kde is running

[Christopher Bratusek <chrisb src gnome org>]

commit d0876f4615ad636d4f83bc35e9f4e5e01b6086f8
Author: chrisb <zanghar freenet de>
Date:   Thu Sep 3 20:30:32 2009 +0200

    try loading kde-int if kde is running

 ChangeLog                   |    2 ++
 lisp/sawfish/wm/defaults.jl |    6 ++++++
 2 files changed, 8 insertions(+), 0 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index ee7c536..d737ae5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -7,6 +7,8 @@
 
 	* po/POTFILES.in: updated
 
+	* lisp/sawfish/wm/defaults.jl: try loading kde-int if kde is running
+
 2009-09-02  Christopher Bratusek <zanghar freenet de>
 	* lisp/sawfish/wm/commands/user.jl
 	* lisp/sawfish/wm/commands/help.jl: replace display-url by browser
diff --git a/lisp/sawfish/wm/defaults.jl b/lisp/sawfish/wm/defaults.jl
index 822ed36..80511e3 100644
--- a/lisp/sawfish/wm/defaults.jl
+++ b/lisp/sawfish/wm/defaults.jl
@@ -34,5 +34,11 @@
   (if (getenv "GNOME_DESKTOP_SESSION_ID")
     (require 'sawfish.wm.integration.gnome)))
 
+;; if it looks like KDE is the desktop environment, then load the
+;; extra KDE integration module
+(unless batch-mode
+  (if (getenv "KDE_SESSION_VERSION")
+    (require 'sawfish.wm.integration.kde)))
+
 ;; save errors to aid debugging
 (require 'sawfish.wm.ext.error-handler)