aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Config
diff options
context:
space:
mode:
authorDevin Mullins <me@twifkak.com>2008-09-21 03:11:59 +0200
committerDevin Mullins <me@twifkak.com>2008-09-21 03:11:59 +0200
commit508debd233d9bddf5f5f8c8ad071fcbe52da4f0e (patch)
treeacf8b9e46e295dbb61db0b137456d4e32505da2d /XMonad/Config
parent4f7c0734e3736dce79dda5656f6bd88540d9e9d1 (diff)
downloadXMonadContrib-508debd233d9bddf5f5f8c8ad071fcbe52da4f0e.tar.gz
XMonadContrib-508debd233d9bddf5f5f8c8ad071fcbe52da4f0e.tar.xz
XMonadContrib-508debd233d9bddf5f5f8c8ad071fcbe52da4f0e.zip
cleanup - use currentTag
darcs-hash:20080921011159-78224-b0ac172560719cba3a1c41171d91e222a6fa1304.gz
Diffstat (limited to 'XMonad/Config')
-rw-r--r--XMonad/Config/Droundy.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Config/Droundy.hs b/XMonad/Config/Droundy.hs
index 8a10fb2..a78947b 100644
--- a/XMonad/Config/Droundy.hs
+++ b/XMonad/Config/Droundy.hs
@@ -176,7 +176,7 @@ instance UrgencyHook FocusUrgencyHook Window where
s { windowset = until ((Just w ==) . W.peek)
W.focusUp $ windowset s }
| otherwise =
- let t = W.tag $ W.workspace $ W.current $ windowset s
+ let t = W.currentTag $ windowset s
in s { windowset = until ((Just w ==) . W.peek)
W.focusUp $ copyWindow w t $ windowset s }
has _ Nothing = False