Skip to content

G
gargantext-ihaskell
Commit 2b4af24b authored by Andrew Gibiansky's avatar Andrew Gibiansky
Browse files
Options

undoing debugging printDisplay

parent 59322359
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 3 deletions
ihaskell-display/ihaskell-basic/IHaskell/Display/Basic.hs
View file @ 2b4af24b
...@@ -6,9 +6,7 @@ import IHaskell.Display ...@@ -6,9 +6,7 @@ import IHaskell.Display
import Text.Printf import Text.Printf
instance Show a => IHaskellDisplay (Maybe a) where instance Show a => IHaskellDisplay (Maybe a) where
display just = do display just = return $ Display [stringDisplay, htmlDisplay]
printDisplay $ Display [stringDisplay, htmlDisplay]
return $ Display [stringDisplay, htmlDisplay]
where where
stringDisplay = plain (show just) stringDisplay = plain (show just)
htmlDisplay = html str htmlDisplay = html str
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment