diff -u bluetile-0.5.3/src/Config.hs\~ bluetile-0.5.3/src/Config.hs
--- bluetile-0.5.3/src/Config.hs~	2010-08-11 06:58:22.000000000 +0900
+++ bluetile-0.5.3/src/Config.hs	2011-05-12 19:12:00.000000000 +0900
@@ -183,7 +183,7 @@
 createXMonadConfig bluetilerc =
     defaultConfig
         { modMask = defaultModifierBRC bluetilerc,
-          startupHook = ewmhDesktopsStartup >> setWMName "LG3D",
+          startupHook = ewmhDesktopsStartup,
           manageHook = bluetileManageHook,
           layoutHook = bluetileLayoutHook bluetileTheme,
           logHook = currentWorkspaceOnTop >> ewmhDesktopsLogHook,
diff -u bluetile-0.5.3/src/XMonad/Hooks/EwmhDesktops.hs\~ bluetile-0.5.3/src/XMonad/Hooks/EwmhDesktops.hs
--- bluetile-0.5.3/src/XMonad/Hooks/EwmhDesktops.hs~	2010-08-11 06:58:22.000000000 +0900
+++ bluetile-0.5.3/src/XMonad/Hooks/EwmhDesktops.hs	2011-05-23 09:49:52.000000000 +0900
@@ -243,7 +243,7 @@
                          ]
     io $ changeProperty32 dpy r a c propModeReplace (fmap fromIntegral supp)
 
-    setWMName "xmonad"
+    setWMName "bluetile"
 
 setActiveWindow :: X ()
 setActiveWindow = withWindowSet $ \s -> withDisplay $ \dpy -> do