diff options
Diffstat (limited to 'www/hs-activehs/files/patch-Converter.hs')
| -rw-r--r-- | www/hs-activehs/files/patch-Converter.hs | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/www/hs-activehs/files/patch-Converter.hs b/www/hs-activehs/files/patch-Converter.hs index 2cab802ee939..b0d545cc772e 100644 --- a/www/hs-activehs/files/patch-Converter.hs +++ b/www/hs-activehs/files/patch-Converter.hs @@ -1,6 +1,6 @@ ---- ./Converter.hs.orig 2013-02-12 20:23:45.000000000 +0100 -+++ ./Converter.hs 2013-12-27 18:34:37.000000000 +0100 -@@ -28,7 +28,7 @@ +--- Converter.hs.orig 2013-02-12 19:23:45 UTC ++++ Converter.hs +@@ -28,7 +28,7 @@ import System.Directory (getTemporaryDir import Control.Monad import Data.List @@ -9,7 +9,7 @@ ---------------------------------- -@@ -206,7 +206,7 @@ +@@ -206,7 +206,7 @@ preprocessForSlides x = case span (not . ------------------------------------ rawHtml :: String -> Block @@ -18,7 +18,13 @@ showBlockSimple :: Language -> String -> String -> Int -> String -> [Block] -@@ -249,8 +249,8 @@ +@@ -244,13 +244,13 @@ mkImport m d + , HSyn.importSrc = False + , HSyn.importPkg = Nothing + , HSyn.importAs = Nothing +- , HSyn.importSpecs = Just (True, map (HSyn.IVar . mkName) d) ++ , HSyn.importSpecs = Just (True, map (HSyn.IVar HSyn.NoNamespace . mkName) d) + } mkName :: String -> HSyn.Name mkName n@(c:_) |