diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2017-10-05 11:30:44 +0200 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2017-10-05 11:30:44 +0200 |
| commit | 2262f005ce5b39ccd3694f61f2507b9e61c3804c (patch) | |
| tree | b580773af8837ec5fcad80e240846daa68004ea9 /src/Text/Pandoc | |
| parent | 0e54d51d89d2828cbea09938db9a981e1d5c5f47 (diff) | |
Use hslua v0.9.0
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Lua/PandocModule.hs | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/src/Text/Pandoc/Lua/PandocModule.hs b/src/Text/Pandoc/Lua/PandocModule.hs index f9b072dff..3c27ecffb 100644 --- a/src/Text/Pandoc/Lua/PandocModule.hs +++ b/src/Text/Pandoc/Lua/PandocModule.hs @@ -16,9 +16,6 @@ along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -} {-# LANGUAGE CPP #-} -#if !MIN_VERSION_hslua(0,9,0) -{-# OPTIONS_GHC -fno-warn-orphans #-} -#endif {- | Module : Text.Pandoc.Lua.PandocModule Copyright : Copyright © 2017 Albert Krewinkel @@ -40,7 +37,7 @@ import Data.Default (Default (..)) import Data.IORef import Data.Maybe (fromMaybe) import Data.Text (pack) -import Foreign.Lua (Lua, FromLuaStack, ToLuaStack, NumResults, liftIO) +import Foreign.Lua (Lua, FromLuaStack, NumResults, liftIO) import Foreign.Lua.FunctionCalling (ToHaskellFunction) import Text.Pandoc.Class (readDataFile, runIO, runIOorExplode, setUserDataDir, CommonState(..), @@ -186,11 +183,3 @@ instance FromLuaStack a => FromLuaStack (OrNil a) where if noValue then return (OrNil Nothing) else OrNil . Just <$> Lua.peek idx - -#if !MIN_VERSION_hslua(0,9,0) -instance ToLuaStack BL.ByteString where - push = Lua.push . BL.toStrict - -instance FromLuaStack BL.ByteString where - peek = fmap BL.fromStrict . Lua.peek -#endif |