From 60cf63e380ed5e9001170ddd985ade799ef4e844 Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Mon, 17 Sep 2007 23:40:52 +0200
Subject: Eliminate Operations.sink too

darcs-hash:20070917214052-a5988-62b6e8d26a78a7e25a2e0117f7f112c5b039d933
---
 Operations.hs | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'Operations.hs')

diff --git a/Operations.hs b/Operations.hs
index ae95d9e..e516381 100644
--- a/Operations.hs
+++ b/Operations.hs
@@ -451,10 +451,6 @@ initColor dpy c = (color_pixel . fst) `liftM` allocNamedColor dpy colormap c
 ------------------------------------------------------------------------
 -- | Floating layer support
 
--- | Make a floating window tiled
-sink :: Window -> X ()
-sink = windows . W.sink
-
 -- | Make a tiled window floating, using its suggested rectangle
 float :: Window -> X ()
 float w = withDisplay $ \d -> do
-- 
cgit v1.2.3