add # to unescaped characters in md hrefs

This commit is contained in:
Anton Dyudin 2016-04-06 11:52:06 -07:00
parent 14c2568112
commit 0b683764a8

View File

@ -210,7 +210,7 @@
|= a/tape ^- tape |= a/tape ^- tape
?~ a ~ ?~ a ~
?: ?| [?=(^ q)]:(alp 1^1 a) ?: ?| [?=(^ q)]:(alp 1^1 a)
(~(has in (silt "!*'();:@&=+$,/?/%.~_")) i.a) :: XX reparse (~(has in (silt "#!*'();:@&=+$,/?/%.~_")) i.a) :: XX reparse
== ==
[i.a $(a t.a)] [i.a $(a t.a)]
(weld (urle (trip i.a)) $(a t.a)) (weld (urle (trip i.a)) $(a t.a))