diff options
| author | Albert Krewinkel <albert@zeitkraut.de> | 2018-08-12 00:38:43 +0200 |
|---|---|---|
| committer | Albert Krewinkel <albert@zeitkraut.de> | 2018-08-12 12:28:06 +0200 |
| commit | acf6df1aef337f71612f6d05c8aaa526255b3942 (patch) | |
| tree | 1964c4b4a4bb6f423d7cca693b07afd925b6b25f /src/Text/Pandoc/Writers | |
| parent | fb3ee947aa288af31d76369ab380bf68d3024752 (diff) | |
| download | pandoc-acf6df1aef337f71612f6d05c8aaa526255b3942.tar.gz | |
Lua: cleanup Lua utils, remove unused functions.
Diffstat (limited to 'src/Text/Pandoc/Writers')
| -rw-r--r-- | src/Text/Pandoc/Writers/Custom.hs | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/Text/Pandoc/Writers/Custom.hs b/src/Text/Pandoc/Writers/Custom.hs index c0940ad78..866df85be 100644 --- a/src/Text/Pandoc/Writers/Custom.hs +++ b/src/Text/Pandoc/Writers/Custom.hs @@ -48,7 +48,7 @@ import Text.Pandoc.Definition import Text.Pandoc.Error import Text.Pandoc.Lua.Init (runPandocLua, registerScriptPath) import Text.Pandoc.Lua.StackInstances () -import Text.Pandoc.Lua.Util (addValue, dostring') +import Text.Pandoc.Lua.Util (addField, addValue, dostring') import Text.Pandoc.Options import Text.Pandoc.Templates import qualified Text.Pandoc.UTF8 as UTF8 @@ -82,12 +82,12 @@ instance ToLuaStack (Stringify MetaValue) where instance ToLuaStack (Stringify Citation) where push (Stringify cit) = do createtable 6 0 - addValue "citationId" $ citationId cit - addValue "citationPrefix" . Stringify $ citationPrefix cit - addValue "citationSuffix" . Stringify $ citationSuffix cit - addValue "citationMode" $ show (citationMode cit) - addValue "citationNoteNum" $ citationNoteNum cit - addValue "citationHash" $ citationHash cit + addField "citationId" $ citationId cit + addField "citationPrefix" . Stringify $ citationPrefix cit + addField "citationSuffix" . Stringify $ citationSuffix cit + addField "citationMode" $ show (citationMode cit) + addField "citationNoteNum" $ citationNoteNum cit + addField "citationHash" $ citationHash cit -- | Key-value pair, pushed as a table with @a@ as the only key and @v@ as the -- associated value. |
