From cd75c27ff2e3b20d3adf8dcc1de9894873314c04 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Mon, 21 May 2007 06:21:18 +0200 Subject: Fixes for windowset -> workspace rename darcs-hash:20070521042118-a5988-a2f979585ee35d3905dbcf6244c22af67489caa6.gz --- Dmenu.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Dmenu.hs') diff --git a/Dmenu.hs b/Dmenu.hs index c27fbe2..879d9ed 100644 --- a/Dmenu.hs +++ b/Dmenu.hs @@ -24,7 +24,7 @@ runProcessWithInput cmd args input = do -- http://www.jcreigh.com/dmenu/dmenu-2.8-xinerama.patch dmenuXinerama :: [String] -> X String dmenuXinerama opts = do - ws <- gets workspace + ws <- gets windowset let curscreen = fromIntegral $ fromMaybe 0 (M.lookup (W.current ws) (W.ws2screen ws)) :: Int io $ runProcessWithInput "dmenu" ["-xs", show (curscreen+1)] (unlines opts) -- cgit v1.2.3