marcuskammer/cl-hssg
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Do not downcase string tags in HTML/XML artifacts

Browse source 
If the tag of an S-XML expression is given as a string that is a sign
that the author actually does want to preserve the case.  Downcasing
should only be performed for symbol tags.  An example of wanting to
preserve the case is the "pubDate" tag in RSS feeds.
This commit is contained in:
HiPhish 2023-12-03 23:21:37 +01:00
parent 4aa3958c99
commit f8ca135ff4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/hssg/artifacts/html.lisp
View file

@ -45,7 +45,7 @@
(declare (type atom symbol) (declare (type atom symbol)
(optimize (speed 3) (safety 0))) (optimize (speed 3) (safety 0)))
(etypecase symbol (etypecase symbol
(string (string-downcase symbol)) (string symbol)
(symbol (string-downcase (symbol-name symbol))) (symbol (string-downcase (symbol-name symbol)))
(atom (string-downcase (princ-to-string symbol))))) (atom (string-downcase (princ-to-string symbol)))))