From 55e5ad2d8f455ee7eb32896708701c3246f60bed Mon Sep 17 00:00:00 2001 From: Leonard Rosenthol Date: Fri, 11 Sep 2020 01:58:53 -0400 Subject: Changed default link state to invisible (#6676) --- src/Text/Pandoc/Writers/ICML.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text/Pandoc') diff --git a/src/Text/Pandoc/Writers/ICML.hs b/src/Text/Pandoc/Writers/ICML.hs index dbfbfff5b..dcf5acfef 100644 --- a/src/Text/Pandoc/Writers/ICML.hs +++ b/src/Text/Pandoc/Writers/ICML.hs @@ -291,7 +291,7 @@ hyperlinksToDoc (x:xs) = hyp x $$ hyperlinksToDoc xs else selfClosingTag "HyperlinkURLDestination" [("Self", "HyperlinkURLDestination/"<>escapeColons url), ("Name","link"), ("DestinationURL",url), ("DestinationUniqueKey","1")] -- HyperlinkURLDestination with more than one colon crashes CS6 hlink = inTags True "Hyperlink" [("Self","uf-"<>tshow ident), ("Name",url), - ("Source","htss-"<>tshow ident), ("Visible","true"), ("DestinationUniqueKey","1")] + ("Source","htss-"<>tshow ident), ("Visible","false"), ("DestinationUniqueKey","1")] $ inTags True "Properties" [] $ inTags False "BorderColor" [("type","enumeration")] (text "Black") $$ inTags False "Destination" [("type","object")] (makeDest url) -- cgit v1.2.3