From 1c609288ddd53559e26f9c52994e43f3eefaa7cf Mon Sep 17 00:00:00 2001
From: "l.mai" <l.mai@web.de>
Date: Mon, 4 Jun 2007 18:20:45 +0000
Subject: [PATCH] realign guard

---
 StackSet.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/StackSet.hs b/StackSet.hs
index 9ce1df9..05a5ca3 100644
--- a/StackSet.hs
+++ b/StackSet.hs
@@ -194,7 +194,7 @@ view i s
     -- if it is visible, it is just raised
     = s { current = x, visible = current s : L.delete x (visible s) }
 
-    | Just x <- L.find ((i==).tag)     (hidden  s)
+    | Just x <- L.find ((i==).tag)           (hidden  s)
     -- if it was hidden, it is raised on the xine screen currently used
     = s { current = Screen x (screen (current s))
         , hidden = workspace (current s) : L.delete x (hidden s) }