diff options
| -rw-r--r-- | ViewPrev.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/ViewPrev.hs b/ViewPrev.hs index 840dd85..13a696b 100644 --- a/ViewPrev.hs +++ b/ViewPrev.hs @@ -21,8 +21,6 @@ import XMonad import Operations import qualified StackSet as W -viewPrev' :: (Eq a, Eq s, Eq i) => W.StackSet i a s sd -> W.StackSet i a s sd -viewPrev' x = W.view (W.tag . head . W.hidden $ x) x - viewPrev :: X () viewPrev = windows viewPrev' + where viewPrev' x = W.view (W.tag . head . W.hidden $ x) x |