Skip to content

Commit 89ee349

Browse files
committed
Upgrade to haddock-library-1.11.0 (haskell#1126)
1 parent 4783ecb commit 89ee349

File tree

3 files changed

+5
-5
lines changed

3 files changed

+5
-5
lines changed

hackage-server.cabal

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -111,8 +111,8 @@ common defaults
111111
, process >= 1.6 && < 1.7
112112
, text ^>= 1.2.5.0 || ^>= 2.0
113113
, time >= 1.9 && < 1.13
114-
, transformers >= 0.5 && < 0.7
115-
, unix >= 2.7 && < 2.9
114+
, transformers >= 0.5 && < 0.6
115+
, unix >= 2.7 && < 2.8
116116
, scientific
117117
-- other dependencies shared by most components
118118
build-depends:
@@ -399,7 +399,7 @@ library lib-server
399399
-- see https://github.com/haskell/hackage-server/issues/1130
400400
-- Thus, we need to include Cabal-syntax as dependency explicitly
401401
, hackage-security-HTTP ^>= 0.1.1
402-
, haddock-library >= 1.7.0 && < 1.11
402+
, haddock-library ^>= 1.11.0
403403
-- haddock-library-1.11.0 changed type of markupOrderedList
404404
-- see https://github.com/haskell/hackage-server/issues/1128
405405
, happstack-server ^>= 7.7.1 || ^>= 7.8.0

src/Distribution/Server/Features/Search/ExtractDescriptionTerms.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -78,7 +78,7 @@ termsMarkup = Markup {
7878
markupBold = id,
7979
markupMonospaced = \s -> if length s > 1 then [] else s,
8080
markupUnorderedList = concat,
81-
markupOrderedList = concat,
81+
markupOrderedList = concat . map snd,
8282
markupDefList = concatMap (\(d,t) -> d ++ t),
8383
markupCodeBlock = const [],
8484
markupTable = concat . F.toList,

src/Distribution/Server/Pages/Package/HaddockHtml.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,7 @@ htmlMarkup modResolv = Markup {
2424
markupBold = strong,
2525
markupMonospaced = thecode,
2626
markupUnorderedList = unordList,
27-
markupOrderedList = ordList,
27+
markupOrderedList = ordList . map snd,
2828
markupDefList = defList,
2929
markupCodeBlock = pre,
3030
markupHyperlink = \(Hyperlink url mLabel) -> anchor ! [href url] << maybe url showHtmlFragment mLabel,

0 commit comments

Comments
 (0)