Merge pull request #5457 from h5gq3/patch-1

zuse: allow " in xml text nodes during parsing
This commit is contained in:
fang 2021-12-02 12:15:11 +01:00 committed by GitHub
commit b67830e800
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -4422,7 +4422,7 @@
:: :: ++chrd:de-xml:html
++ chrd :: character data
%+ cook |=(a=tape ^-(mars ;/(a)))
(plus ;~(less doq ;~(pose (just `@`10) escp)))
(plus ;~(pose (just `@`10) escp))
:: :: ++comt:de-xml:html
++ comt :: comments
=- (ifix [(jest '<!--') (jest '-->')] (star -))