From 21033ad1ff3948c39dab6fca2e003acb6f575cc2 Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Mon, 19 Apr 2010 03:43:44 +0200 Subject: Use CPP to add to exports for Selective tests (L.LimitWindows) Ignore-this: 74c228892f07bb827e4b419f4efdb04 darcs-hash:20100419014344-1499c-4a6191209e2f2457f1ca1e347387bb74d9dd957a.gz --- XMonad/Layout/LimitWindows.hs | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'XMonad') diff --git a/XMonad/Layout/LimitWindows.hs b/XMonad/Layout/LimitWindows.hs index d8ef6a1..d437b72 100644 --- a/XMonad/Layout/LimitWindows.hs +++ b/XMonad/Layout/LimitWindows.hs @@ -1,4 +1,4 @@ -{-# LANGUAGE FlexibleInstances, MultiParamTypeClasses, DeriveDataTypeable, PatternGuards #-} +{-# LANGUAGE CPP, FlexibleInstances, MultiParamTypeClasses, DeriveDataTypeable, PatternGuards #-} ----------------------------------------------------------------------------- -- | -- Module : XMonad.Layout.LimitWindows @@ -23,7 +23,12 @@ module XMonad.Layout.LimitWindows ( limitWindows,limitSlice,limitSelect, -- * Change the number of windows - increaseLimit,decreaseLimit,setLimit + increaseLimit,decreaseLimit,setLimit, + +#ifdef TESTING + -- * For tests + select,update,Selection(..),updateAndSelect, +#endif ) where import XMonad.Layout.LayoutModifier -- cgit v1.2.3