[sawfish] make properly use of WM_NAME in Elberg-tabbed

[Christopher Bratusek <chrisb src gnome org>]

commit 0dd4cd2304895120c2b461361e27993a47d95334
Author: chrisb <zanghar freenet de>
Date:   Fri Jun 19 19:45:22 2009 +0200

    make properly use of WM_NAME in Elberg-tabbed

 ChangeLog                     |    2 ++
 man/news.texi                 |    2 ++
 themes/Elberg-tabbed/theme.jl |   10 ++--------
 3 files changed, 6 insertions(+), 8 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index 3f51ca4..155cc97 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,8 @@
 2009-06-19  Christopher Bratusek <zanghar freenet de>
 	* themes/microGUI/theme.jl: fixed a speed-issue
 
+	* themes/Elberg-tabbed: make properly use of WM_NAME
+
 2009-06-01  Christopher Bratusek <zanghar freenet de>
 	* lisp/sawfish/gtk/widget.jl: UTF-8 Support
 
diff --git a/man/news.texi b/man/news.texi
index 82967f2..6827554 100644
--- a/man/news.texi
+++ b/man/news.texi
@@ -70,6 +70,8 @@ To use the old style, put @code{(define-special-variable customize-program "sawf
 @item Fixup the last incomplete AC_DEFINE [Christopher Bratusek]
 
 @item Fixed a speed-issue with microGUI [Christopher Bratusek]
+
+ item Make properly use of WM_NAME in Elberg-tabbed [Christopher Bratusek]
 @end itemize
 
 @item New features:
diff --git a/themes/Elberg-tabbed/theme.jl b/themes/Elberg-tabbed/theme.jl
index bfed80f..36025ca 100644
--- a/themes/Elberg-tabbed/theme.jl
+++ b/themes/Elberg-tabbed/theme.jl
@@ -442,12 +442,6 @@
 		       ((shaped) shaped-frame)
 		       ((shaped-transient) shaped-transient-frame))))
 
-  ;(call-after-property-changed
-  ; 'WM_NAME (lambda ()
-  ;	      (rebuild-frames-with-style 'Elberg-tabbed))))
   (call-after-property-changed
-    'WM_NAME (lambda (w prop state)
-	       (reframe-window w)
-	       ;(rebuild-frames-with-style 'Elberg-tabbed)
-	       ))
-)
+    '(WM_NAME _NET_WM_NAME) (lambda (w prop state)
+	       (reframe-window w))))