From 346cc3269ee31062fa7eb560f90c4059c6279962 Mon Sep 17 00:00:00 2001
From: "joachim.fasting" <joachim.fasting@gmail.com>
Date: Wed, 20 Jun 2007 00:03:23 +0200
Subject: Fix type signatures.

Think this fixes the rest of the errors caused by the Layout change.

darcs-hash:20070619220323-ea16c-3274cd24d01bc932089ab88191ccda316ea93b01.gz
---
 NoBorders.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'NoBorders.hs')

diff --git a/NoBorders.hs b/NoBorders.hs
index e0862f8..5588b8b 100644
--- a/NoBorders.hs
+++ b/NoBorders.hs
@@ -37,10 +37,10 @@ import {-# SOURCE #-} Config (borderWidth)
 --
 -- > layouts = [ noBorders full, tall, ... ]
 
-noBorders :: Layout -> Layout
+noBorders :: Layout a -> Layout a
 noBorders = withBorder 0
 
-withBorder :: Dimension -> Layout -> Layout
+withBorder :: Dimension -> Layout a -> Layout a
 withBorder bd l = l { doLayout = \r x -> setborders bd >> doLayout l r x
                     , modifyLayout = ml }
     where ml m | Just UnDoLayout == fromMessage m
-- 
cgit v1.2.3