1 files changed, 1 insertions, 1 deletions
diff --git a/Mosaic.hs b/Mosaic.hs
index 05bd903..f00825e 100644
--- a/Mosaic.hs
+++ b/Mosaic.hs
@@ -204,5 +204,5 @@ unName :: NamedWindow -> Window
 unName (NW _ w) = w
 
 withNamedWindow :: (NamedWindow -> X ()) -> X ()
-withNamedWindow f = do ws <- gets workspace
+withNamedWindow f = do ws <- gets windowset
                        whenJust (W.peek ws) $ \w -> getName w >>= f