Merge remote-tracking branch 'kazu/master'

This commit is contained in:
Alejandro Serrano
2014-08-01 17:08:50 +02:00
2 changed files with 4 additions and 2 deletions

View File

@@ -39,8 +39,9 @@ class ToString a where
toPlain :: Options -> a -> Builder
lineSep :: Options -> String
lineSep opt = lsep
lineSep opt = interpret lsep
where
interpret s = read $ "\"" ++ s ++ "\""
LineSeparator lsep = lineSeparator opt
-- |