From 9ee28f5ba75f1ef5b65e072bdb0d36c9d07e7956 Mon Sep 17 00:00:00 2001 From: "l.mai" Date: Mon, 4 Jun 2007 20:20:45 +0200 Subject: realign guard darcs-hash:20070604182045-42ea9-c6c9a4ddc19c0713008d71ea7119a5f37953b3dd.gz --- StackSet.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'StackSet.hs') 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) } -- cgit v1.2.3