Format wrapped strings more intuitively
This commit is contained in:
parent
152f988363
commit
eb7848064a
|
@ -15,7 +15,10 @@ import qualified Codec.Picture as CP
|
|||
import Language.Haskell.TH.Syntax (Lift(..))
|
||||
|
||||
newtype String = StringWrapper Prelude.String
|
||||
deriving (Eq, Show, Lift)
|
||||
deriving (Eq, Lift)
|
||||
|
||||
instance Show String where
|
||||
show (StringWrapper s) = show s
|
||||
|
||||
type FilePath = String
|
||||
|
||||
|
|
Loading…
Reference in New Issue