diff options
author | tv <tv@shackspace.de> | 2015-06-26 23:02:09 +0200 |
---|---|---|
committer | tv <tv@shackspace.de> | 2015-10-17 01:50:20 +0200 |
commit | b649c9a6c2d83b291d836623ebf96136a79f9601 (patch) | |
tree | 69a68336c5274cdc764071a1655e8d9f33e4b102 | |
parent | 121788445628bb99079c65a622137f1d6b92e1bd (diff) |
bump compatibility to nixos-15.06pre64030.e1af50c
-rw-r--r-- | src/Trammel.hs | 4 |
1 files changed, 2 insertions, 2 deletions
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 |