Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-pandoc-lua-engine for
openSUSE:Factory checked in at 2024-10-28 15:19:02
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-pandoc-lua-engine (Old)
and /work/SRC/openSUSE:Factory/.ghc-pandoc-lua-engine.new.2020 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-pandoc-lua-engine"
Mon Oct 28 15:19:02 2024 rev:10 rq:1218566 version:0.3.3
Changes:
--------
---
/work/SRC/openSUSE:Factory/ghc-pandoc-lua-engine/ghc-pandoc-lua-engine.changes
2024-08-06 09:08:43.678689234 +0200
+++
/work/SRC/openSUSE:Factory/.ghc-pandoc-lua-engine.new.2020/ghc-pandoc-lua-engine.changes
2024-10-28 15:21:28.978356253 +0100
@@ -1,0 +2,12 @@
+Sat Oct 5 21:05:45 UTC 2024 - Peter Simons <[email protected]>
+
+- Update pandoc-lua-engine to version 0.3.3.
+ Upstream does not provide a change log file.
+
+-------------------------------------------------------------------
+Tue Sep 10 17:25:21 UTC 2024 - Peter Simons <[email protected]>
+
+- Update pandoc-lua-engine to version 0.3.2.
+ Upstream does not provide a change log file.
+
+-------------------------------------------------------------------
Old:
----
pandoc-lua-engine-0.3.1.tar.gz
New:
----
pandoc-lua-engine-0.3.3.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-pandoc-lua-engine.spec ++++++
--- /var/tmp/diff_new_pack.HZruk4/_old 2024-10-28 15:21:30.530420890 +0100
+++ /var/tmp/diff_new_pack.HZruk4/_new 2024-10-28 15:21:30.534421056 +0100
@@ -20,15 +20,13 @@
%global pkgver %{pkg_name}-%{version}
%bcond_with tests
Name: ghc-%{pkg_name}
-Version: 0.3.1
+Version: 0.3.3
Release: 0
Summary: Lua engine to power custom pandoc conversions
License: GPL-2.0-or-later
URL: https://hackage.haskell.org/package/%{pkg_name}
Source0:
https://hackage.haskell.org/package/%{pkg_name}-%{version}/%{pkg_name}-%{version}.tar.gz
BuildRequires: ghc-Cabal-devel
-BuildRequires: ghc-SHA-devel
-BuildRequires: ghc-SHA-prof
BuildRequires: ghc-aeson-devel
BuildRequires: ghc-aeson-prof
BuildRequires: ghc-base-devel
@@ -39,6 +37,8 @@
BuildRequires: ghc-citeproc-prof
BuildRequires: ghc-containers-devel
BuildRequires: ghc-containers-prof
+BuildRequires: ghc-crypton-devel
+BuildRequires: ghc-crypton-prof
BuildRequires: ghc-data-default-devel
BuildRequires: ghc-data-default-prof
BuildRequires: ghc-doclayout-devel
++++++ pandoc-lua-engine-0.3.1.tar.gz -> pandoc-lua-engine-0.3.3.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/pandoc-lua-engine-0.3.1/pandoc-lua-engine.cabal
new/pandoc-lua-engine-0.3.3/pandoc-lua-engine.cabal
--- old/pandoc-lua-engine-0.3.1/pandoc-lua-engine.cabal 2001-09-09
03:46:40.000000000 +0200
+++ new/pandoc-lua-engine-0.3.3/pandoc-lua-engine.cabal 2001-09-09
03:46:40.000000000 +0200
@@ -1,6 +1,6 @@
cabal-version: 2.4
name: pandoc-lua-engine
-version: 0.3.1
+version: 0.3.3
build-type: Simple
license: GPL-2.0-or-later
license-file: COPYING.md
@@ -105,17 +105,17 @@
, Text.Pandoc.Lua.Writer.Classic
, Text.Pandoc.Lua.Writer.Scaffolding
- build-depends: SHA >= 1.6 && < 1.7
- , aeson
+ build-depends: aeson
, bytestring >= 0.9 && < 0.13
+ , crypton >= 0.30 && < 1.1
, citeproc >= 0.8 && < 0.9
, containers >= 0.6.0.1 && < 0.8
, data-default >= 0.4 && < 0.8
- , doclayout >= 0.4 && < 0.5
+ , doclayout >= 0.5 && < 0.6
, doctemplates >= 0.11 && < 0.12
, exceptions >= 0.8 && < 0.11
, hslua >= 2.3 && < 2.4
- , hslua-module-doclayout>= 1.1 && < 1.2
+ , hslua-module-doclayout>= 1.2 && < 1.3
, hslua-module-path >= 1.1 && < 1.2
, hslua-module-system >= 1.1 && < 1.2
, hslua-module-text >= 1.1 && < 1.2
@@ -124,8 +124,8 @@
, hslua-repl >= 0.1.1 && < 0.2
, lpeg >= 1.1 && < 1.2
, mtl >= 2.2 && < 2.4
- , pandoc >= 3.3 && < 3.4
- , pandoc-lua-marshal >= 0.2.7 && < 0.3
+ , pandoc >= 3.5 && < 3.6
+ , pandoc-lua-marshal >= 0.2.9 && < 0.3
, pandoc-types >= 1.22 && < 1.24
, parsec >= 3.1 && < 3.2
, text >= 1.1.1 && < 2.2
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Filter.hs
new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Filter.hs
--- old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Filter.hs 2001-09-09
03:46:40.000000000 +0200
+++ new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Filter.hs 2001-09-09
03:46:40.000000000 +0200
@@ -43,7 +43,10 @@
-- filter if nothing was returned.
luaFilters <- forcePeek $
if newtop - oldtop >= 1
- then peekList peekFilter top -- get from explicit filter table
+ then liftLua (rawlen top) >>= \case
+ -- explicitly returned filter, either a single one or a list
+ 0 -> (:[]) <$!> peekFilter top -- single filter
+ _ -> peekList peekFilter top -- list of explicit filters
else (:[]) <$!> peekFilter envIdx -- get the implicit filter in _ENV
settop oldtop
runAll luaFilters doc
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Marshal/WriterOptions.hs
new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Marshal/WriterOptions.hs
--- old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Marshal/WriterOptions.hs
2001-09-09 03:46:40.000000000 +0200
+++ new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Marshal/WriterOptions.hs
2001-09-09 03:46:40.000000000 +0200
@@ -95,6 +95,11 @@
(pushPandocList pushString, writerEpubFonts)
(peekList peekString, \opts x -> opts{ writerEpubFonts = x })
+ , property "epub_title_page"
+ "Determines whether a title page is included in EPUB"
+ (pushBool, writerEpubTitlePage)
+ (peekBool, \opts x -> opts{ writerEpubTitlePage = x })
+
, property "epub_metadata"
"Metadata to include in EPUB"
(maybe pushnil pushText, writerEpubMetadata)
@@ -120,6 +125,11 @@
(pushViaJSON, writerHTMLMathMethod)
(peekViaJSON, \opts x -> opts{ writerHTMLMathMethod = x })
+ , property "link_images"
+ "Include links to images instead of embedding in ODT"
+ (pushBool, writerLinkImages)
+ (peekBool, \opts x -> opts{ writerLinkImages = x })
+
, property "html_q_tags"
"Use @<q>@ tags for quotes in HTML"
(pushBool, writerHtmlQTags)
@@ -135,6 +145,16 @@
(pushBool, writerIncremental)
(peekBool, \opts x -> opts{ writerIncremental = x })
+ , property "list_of_figures"
+ "Include list of figures"
+ (pushBool, writerListOfFigures)
+ (peekBool, \opts x -> opts{ writerListOfFigures = x })
+
+ , property "list_of_tables"
+ "Include list of tables"
+ (pushBool, writerListOfTables)
+ (peekBool, \opts x -> opts{ writerListOfTables = x })
+
, property "listings"
"Use listings package for code"
(pushBool, writerListings)
@@ -170,6 +190,16 @@
(pushViaJSON, writerReferenceLocation)
(peekViaJSON, \opts x -> opts{ writerReferenceLocation = x })
+ , property "figure_caption_position"
+ "Location of caption relative to the figure"
+ (pushViaJSON, writerFigureCaptionPosition)
+ (peekViaJSON, \opts x -> opts{ writerFigureCaptionPosition = x })
+
+ , property "table_caption_position"
+ "Location of caption relative to the table"
+ (pushViaJSON, writerTableCaptionPosition)
+ (peekViaJSON, \opts x -> opts{ writerTableCaptionPosition = x })
+
, property "section_divs"
"Put sections in div tags in HTML"
(pushBool, writerSectionDivs)
@@ -180,6 +210,11 @@
(pushBool, writerSetextHeaders)
(peekBool, \opts x -> opts{ writerSetextHeaders = x })
+ , property "list_tables"
+ "Render tables using list tables in RST output"
+ (pushBool, writerListTables)
+ (peekBool, \opts x -> opts{ writerListTables = x })
+
, property "slide_level"
"Force header level of slides"
(maybe pushnil pushIntegral, writerSlideLevel)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Module/Utils.hs
new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Module/Utils.hs
--- old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Module/Utils.hs
2001-09-09 03:46:40.000000000 +0200
+++ new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Module/Utils.hs
2001-09-09 03:46:40.000000000 +0200
@@ -19,6 +19,7 @@
import Control.Applicative ((<|>))
import Control.Monad ((<$!>))
+import Crypto.Hash (hashWith, SHA1(SHA1))
import Data.Data (showConstr, toConstr)
import Data.Default (def)
import Data.Maybe (fromMaybe)
@@ -34,8 +35,6 @@
import Text.Pandoc.Lua.Marshal.Reference
import Text.Pandoc.Lua.PandocLua (PandocLua (unPandocLua))
-import qualified Data.Digest.Pure.SHA as SHA
-import qualified Data.ByteString.Lazy as BSL
import qualified Data.Map as Map
import qualified Data.Text as T
import qualified Text.Pandoc.Builder as B
@@ -54,16 +53,16 @@
, moduleFields = []
, moduleOperations = []
, moduleTypeInitializers = []
- , moduleFunctions = -- FIXME: order alphabetically
+ , moduleFunctions =
[ blocks_to_inlines `since` v[2,2,3]
, citeproc `since` v[2,19,1]
, equals `since` v[2,5]
, from_simple_table `since` v[2,11]
, make_sections `since` v[2,8]
+ , normalize_date `since` v[2,0,6]
, references `since` v[2,17]
- , run_lua_filter `since` v[3,2,1]
, run_json_filter `since` v[2,1,1]
- , normalize_date `since` v[2,0,6]
+ , run_lua_filter `since` v[3,2,1]
, sha1 `since` v[2,0,6]
, stringify `since` v[2,0,6]
, to_roman_numeral `since` v[2,0,6]
@@ -301,8 +300,8 @@
-- | Documented Lua function to compute the hash of a string.
sha1 :: DocumentedFunction e
sha1 = defun "sha1"
- ### liftPure (SHA.showDigest . SHA.sha1)
- <#> parameter (fmap BSL.fromStrict . peekByteString) "string" "input" ""
+ ### liftPure (show . hashWith SHA1)
+ <#> parameter peekByteString "string" "input" ""
=#> functionResult pushString "string" "hexadecimal hash value"
#? "Computes the SHA1 hash of the given string input."
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Module.hs
new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Module.hs
--- old/pandoc-lua-engine-0.3.1/src/Text/Pandoc/Lua/Module.hs 2001-09-09
03:46:40.000000000 +0200
+++ new/pandoc-lua-engine-0.3.3/src/Text/Pandoc/Lua/Module.hs 2001-09-09
03:46:40.000000000 +0200
@@ -91,8 +91,10 @@
, Pandoc.Text.documentedModule
, Pandoc.Types.documentedModule
, Pandoc.Utils.documentedModule
- , Module.Layout.documentedModule { moduleName = "pandoc.layout" }
- `allSince` [2,18]
+ , ((Module.Layout.documentedModule { moduleName = "pandoc.layout" }
+ `allSince` [2,18])
+ `functionsSince` ["bold", "italic", "underlined", "strikeout", "fg",
"bg"])
+ [3, 4, 1]
, Module.Path.documentedModule { moduleName = "pandoc.path" }
`allSince` [2,12]
, Module.Zip.documentedModule { moduleName = "pandoc.zip" }
@@ -102,6 +104,12 @@
allSince mdl version = mdl
{ moduleFunctions = map (`since` makeVersion version) $ moduleFunctions mdl
}
+ functionsSince mdl fns version = mdl
+ { moduleFunctions = map (\fn ->
+ if (functionName fn) `elem` fns
+ then fn `since` makeVersion version
+ else fn) $ moduleFunctions mdl
+ }
-- | Load all global modules and set them to their global variables.
setGlobalModules :: PandocLua ()
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/pandoc-lua-engine-0.3.1/test/lua/single-to-double-quoted.lua
new/pandoc-lua-engine-0.3.3/test/lua/single-to-double-quoted.lua
--- old/pandoc-lua-engine-0.3.1/test/lua/single-to-double-quoted.lua
2001-09-09 03:46:40.000000000 +0200
+++ new/pandoc-lua-engine-0.3.3/test/lua/single-to-double-quoted.lua
2001-09-09 03:46:40.000000000 +0200
@@ -1,10 +1,8 @@
return {
- {
Quoted = function (elem)
if elem.quotetype == "SingleQuote" then
elem.quotetype = "DoubleQuote"
end
return elem
end,
- }
}
