diff options
Diffstat (limited to 'spec/src')
| -rw-r--r-- | spec/src/Thermoprint/Printout.hs | 2 | 
1 files changed, 1 insertions, 1 deletions
| diff --git a/spec/src/Thermoprint/Printout.hs b/spec/src/Thermoprint/Printout.hs index 29da2cb..44ec5e1 100644 --- a/spec/src/Thermoprint/Printout.hs +++ b/spec/src/Thermoprint/Printout.hs | |||
| @@ -183,7 +183,7 @@ prop_text x = (cotext . either id Line . text $ x') == x' | |||
| 183 | , c `elem` keep = c | 183 | , c `elem` keep = c | 
| 184 | | isSpace c = ' ' -- We have to do this because all whitespace gets interpreted as width 1 | 184 | | isSpace c = ' ' -- We have to do this because all whitespace gets interpreted as width 1 | 
| 185 | | otherwise = c | 185 | | otherwise = c | 
| 186 | keep = [' ', '\n'] | 186 | keep = [' ', '\n'] :: [Char] | 
| 187 | 187 | ||
| 188 | -- | We don't test 'Raw' 'Chunk's | 188 | -- | We don't test 'Raw' 'Chunk's | 
| 189 | instance Arbitrary Chunk where | 189 | instance Arbitrary Chunk where | 
