From b649c9a6c2d83b291d836623ebf96136a79f9601 Mon Sep 17 00:00:00 2001 From: tv Date: Fri, 26 Jun 2015 23:02:09 +0200 Subject: bump compatibility to nixos-15.06pre64030.e1af50c --- src/Trammel.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') diff --git a/src/Trammel.hs b/src/Trammel.hs index d83b846..d1abedb 100644 --- a/src/Trammel.hs +++ b/src/Trammel.hs @@ -97,7 +97,7 @@ instance IsPm Bold where toPm NoBold = [22] fromPm = rec . filterPm sgrColor where - rec xs = case filter (`elem`[1,22]) xs of + rec xs = case filter (`elem` ([1,22] :: [Int])) xs of [] -> Nothing xs' -> case last xs' of 1 -> Just Bold @@ -113,7 +113,7 @@ instance IsPm Underline where toPm NoUnderline = [24] fromPm = rec . filterPm sgrColor where - rec xs = case filter (`elem`[4,24]) xs of + rec xs = case filter (`elem` ([4,24] :: [Int])) xs of [] -> Nothing xs' -> case last xs' of 1 -> Just Underline -- cgit v1.2.3