From 9e5fe03ca436b3d794c1d149d62d4f66d6aeecfd Mon Sep 17 00:00:00 2001 From: Daniel Wagner Date: Tue, 28 May 2013 02:35:31 +0200 Subject: depend on data-default, and deprecate the monomorphic name defaultConfig Ignore-this: 1e746731695df3b6f684d5463a3da6a4 darcs-hash:20130528003531-76d51-cb0d530829e7ad54445399456421f3fa7fe231df --- XMonad/Main.hsc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'XMonad/Main.hsc') diff --git a/XMonad/Main.hsc b/XMonad/Main.hsc index 8410a0c..5d59042 100644 --- a/XMonad/Main.hsc +++ b/XMonad/Main.hsc @@ -85,11 +85,11 @@ xmonad initxmc = do xinesc <- getCleanedScreenInfo dpy nbc <- do v <- initColor dpy $ normalBorderColor xmc - ~(Just nbc_) <- initColor dpy $ normalBorderColor Default.defaultConfig + ~(Just nbc_) <- initColor dpy $ normalBorderColor Default.def return (fromMaybe nbc_ v) fbc <- do v <- initColor dpy $ focusedBorderColor xmc - ~(Just fbc_) <- initColor dpy $ focusedBorderColor Default.defaultConfig + ~(Just fbc_) <- initColor dpy $ focusedBorderColor Default.def return (fromMaybe fbc_ v) hSetBuffering stdout NoBuffering -- cgit v1.2.3