Commit 94bb2f33 authored by Gail Zacharias's avatar Gail Zacharias

:no-op tag

parent e575ce1d
......@@ -202,6 +202,10 @@
(htm ((:a :name anchor-tag))
(write-the-object element cl-who-base)))))
(:no-op
(dolist (element (list-elements (the elements)))
(write-the-object element cl-who-base)))
(otherwise (when *warn-on-unrecognized-tags?*
(warn "Markup tag ~s was not recognized~%" (the markup-tag))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment