diff options
| author | Leonard Rosenthol <leonardr@lazerware.com> | 2020-09-11 01:58:53 -0400 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-09-10 22:58:53 -0700 |
| commit | 55e5ad2d8f455ee7eb32896708701c3246f60bed (patch) | |
| tree | e538196e833c9b9db7eeafb92689e7a3b3215fd9 /src/Text/Pandoc/Writers/ICML.hs | |
| parent | 623ce89e0eb08d1878b4a006d32a7c2986b3494a (diff) | |
| download | pandoc-55e5ad2d8f455ee7eb32896708701c3246f60bed.tar.gz | |
Changed default link state to invisible (#6676)
Diffstat (limited to 'src/Text/Pandoc/Writers/ICML.hs')
| -rw-r--r-- | src/Text/Pandoc/Writers/ICML.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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) |