Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package ghc-skylighting-format-blaze-html
for openSUSE:Factory checked in at 2026-11-06 19:50:06
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-skylighting-format-blaze-html (Old)
and
/work/SRC/openSUSE:Factory/.ghc-skylighting-format-blaze-html.new.3759290 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-skylighting-format-blaze-html"
Fri Nov 6 19:50:06 2026 rev:7 rq:1395565 version:0.1.2.2
Changes:
--------
---
/work/SRC/openSUSE:Factory/ghc-skylighting-format-blaze-html/ghc-skylighting-format-blaze-html.changes
2026-06-10 16:10:10.811053978 +0200
+++
/work/SRC/openSUSE:Factory/.ghc-skylighting-format-blaze-html.new.3759290/ghc-skylighting-format-blaze-html.changes
2026-11-06 19:57:09.545127834 +0100
@@ -1,0 +2,17 @@
+Sun Sep 13 19:02:52 UTC 2026 - Peter Simons <[email protected]>
+
+- Update skylighting-format-blaze-html to version 0.1.2.2.
+ ## 0.1.2.2
+
+ * Improve performance of blaze-html formatter.
+
+-------------------------------------------------------------------
+Mon Jul 20 22:18:29 UTC 2026 - Peter Simons <[email protected]>
+
+- Update skylighting-format-blaze-html to version 0.1.2.1.
+ Upstream has edited the change log file since the last release in
+ a non-trivial way, i.e. they did more than just add a new entry
+ at the top. You can review the file at:
+
http://hackage.haskell.org/package/skylighting-format-blaze-html-0.1.2.1/src/changelog.md
+
+-------------------------------------------------------------------
Old:
----
skylighting-format-blaze-html-0.1.2.tar.gz
New:
----
skylighting-format-blaze-html-0.1.2.2.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-skylighting-format-blaze-html.spec ++++++
--- /var/tmp/diff_new_pack.UlGxdQ/_old 2026-11-06 19:57:10.620172836 +0100
+++ /var/tmp/diff_new_pack.UlGxdQ/_new 2026-11-06 19:57:10.625173046 +0100
@@ -19,7 +19,7 @@
%global pkg_name skylighting-format-blaze-html
%global pkgver %{pkg_name}-%{version}
Name: ghc-%{pkg_name}
-Version: 0.1.2
+Version: 0.1.2.2
Release: 0
Summary: HTML formatter for skylighting syntax highlighting library
License: BSD-3-Clause
++++++ skylighting-format-blaze-html-0.1.2.tar.gz ->
skylighting-format-blaze-html-0.1.2.2.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/skylighting-format-blaze-html-0.1.2/changelog.md
new/skylighting-format-blaze-html-0.1.2.2/changelog.md
--- old/skylighting-format-blaze-html-0.1.2/changelog.md 2001-09-09
03:46:40.000000000 +0200
+++ new/skylighting-format-blaze-html-0.1.2.2/changelog.md 2001-09-09
03:46:40.000000000 +0200
@@ -1,15 +1,24 @@
# Changelog for skylighting-format-blaze-html
+## 0.1.2.2
+
+* Improve performance of blaze-html formatter.
+
+## 0.1.2.1
+
+* Ensure that per-line anchors have aria-labels. Otherwise screen
+ readers will read out the `href` attribute.
+
## 0.1.2
- * Include container classes on inline code. In block code,
- these are put on the pre, but in inline code there is only a
- code element; they should not just be dropped. See jgm/pandoc#11423.
+* Include container classes on inline code. In block code,
+ these are put on the pre, but in inline code there is only a
+ code element; they should not just be dropped. See jgm/pandoc#11423.
## 0.1.1.3
- * Use `-webkit-text-size-adjust` instead of unsetting
- inline-block (#202, Jacke Zimmerman).
+* Use `-webkit-text-size-adjust` instead of unsetting
+ inline-block (#202, Jacke Zimmerman).
## 0.1.1.2
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/skylighting-format-blaze-html-0.1.2/skylighting-format-blaze-html.cabal
new/skylighting-format-blaze-html-0.1.2.2/skylighting-format-blaze-html.cabal
--- old/skylighting-format-blaze-html-0.1.2/skylighting-format-blaze-html.cabal
2001-09-09 03:46:40.000000000 +0200
+++
new/skylighting-format-blaze-html-0.1.2.2/skylighting-format-blaze-html.cabal
2001-09-09 03:46:40.000000000 +0200
@@ -1,5 +1,5 @@
name: skylighting-format-blaze-html
-version: 0.1.2
+version: 0.1.2.2
synopsis: HTML formatter for skylighting syntax highlighting library
description: This module allows tokens produced by skylighting-core
to be rendered as HTML.
@@ -22,7 +22,7 @@
library
exposed-modules: Skylighting.Format.HTML
other-extensions: CPP
- build-depends: base >= 4.8 && < 5.0,
+ build-depends: base >= 4.8 && < 5,
skylighting-core,
text,
containers,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/skylighting-format-blaze-html-0.1.2/src/Skylighting/Format/HTML.hs
new/skylighting-format-blaze-html-0.1.2.2/src/Skylighting/Format/HTML.hs
--- old/skylighting-format-blaze-html-0.1.2/src/Skylighting/Format/HTML.hs
2001-09-09 03:46:40.000000000 +0200
+++ new/skylighting-format-blaze-html-0.1.2.2/src/Skylighting/Format/HTML.hs
2001-09-09 03:46:40.000000000 +0200
@@ -60,8 +60,9 @@
. mconcat . intersperse (toHtml "\n")
. map (mapM_ (tokenToHtml opts))
--- | Format tokens as an HTML @pre@ block. Each line is wrapped in an a
--- element with the class ‘source-line’. If line numbering
+-- | Format tokens as an HTML @pre@ block. Each line is wrapped in a
+-- span element whose id is the line number (prefixed with 'lineIdPrefix'),
+-- beginning with an empty anchor linking to the line. If line numbering
-- is selected, the surrounding pre is given the class ‘numberSource’,
-- and the resulting html will display line numbers thanks to the included
-- CSS. See the documentation for 'formatHtmlInline' for information about how
@@ -70,7 +71,8 @@
formatHtmlBlock = formatHtmlBlockFor Html5
-- | Like 'formatHtmlBlock' but uses only attributes valid in HTML 4
--- (so, @aria-hidden@ is not used in empty line number spans).
+-- (so, no @aria-hidden@ or @aria-label@ attributes are used on the
+-- line anchors).
formatHtml4Block :: FormatOptions -> [SourceLine] -> Html
formatHtml4Block = formatHtmlBlockFor Html4
@@ -83,12 +85,13 @@
H.pre ! A.class_ (toValue $ Text.unwords classes)
$ wrapCode opts
$ mconcat . intersperse (toHtml "\n")
- $ zipWith (sourceLineToHtml htmlVersion opts) [startNum..] ls
+ $ zipWith (sourceLineToHtml htmlVersion opts idPrefix) [startNum..] ls
where classes = Text.pack "sourceCode" :
[Text.pack "numberSource" | numberLines opts] ++
[x | x <- containerClasses opts
, x /= Text.pack "sourceCode"]
startNum = LineNo $ startNumber opts
+ idPrefix = Text.unpack (lineIdPrefix opts)
wrapCode :: FormatOptions -> Html -> Html
wrapCode opts h = H.code ! A.class_ (toValue $ Text.unwords
@@ -101,16 +104,19 @@
startZero = startNumber opts - 1
-- | Each line of source is wrapped in an (inline-block) anchor that makes
--- subsequent per-line processing (e.g. adding line numnbers) possible.
-sourceLineToHtml :: HtmlVersion -> FormatOptions -> LineNo -> SourceLine ->
Html
-sourceLineToHtml htmlVersion opts lno cont =
+-- subsequent per-line processing (e.g. adding line numbers) possible.
+sourceLineToHtml :: HtmlVersion -> FormatOptions -> String -> LineNo ->
SourceLine
+ -> Html
+sourceLineToHtml htmlVersion opts idPrefix lno cont =
H.span ! A.id lineNum
$ do
H.a ! A.href lineRef
- ! (if numberLines opts || htmlVersion == Html4
- then mempty
- else customAttribute (fromString "aria-hidden")
- (fromString "true")) -- see jgm/pandoc#6352
+ ! (case numberLines opts of
+ _ | htmlVersion == Html4 -> mempty
+ False -> customAttribute (fromString "aria-hidden")
+ (fromString "true") -- see jgm/pandoc#6352
+ True -> customAttribute (fromString "aria-label")
+ (fromString (show (lineNo lno)))) -- see #211
! (if numberLines opts
then mempty
else customAttribute (fromString "tabindex")
@@ -119,15 +125,18 @@
mapM_ (tokenToHtml opts) cont
where lineNum = toValue prefixedLineNo
lineRef = toValue ('#':prefixedLineNo)
- prefixedLineNo = Text.unpack (lineIdPrefix opts) <> show (lineNo lno)
+ prefixedLineNo = idPrefix <> show (lineNo lno)
tokenToHtml :: FormatOptions -> Token -> Html
tokenToHtml _ (NormalTok, txt) = toHtml txt
tokenToHtml opts (toktype, txt) =
if titleAttributes opts
- then sp ! A.title (toValue $ show toktype)
+ -- the class and title values are known to be HTML-safe, so we use
+ -- preEscapedToValue to skip escaping at render time
+ then sp ! A.title (preEscapedToValue (show toktype))
else sp
- where sp = H.span ! A.class_ (toValue $ short toktype) $ toHtml txt
+ where sp = H.span ! A.class_ (preEscapedToValue (short toktype))
+ $ toHtml txt
short :: TokenType -> String
short KeywordTok = "kw"
