Maps the ns prefix to its associated url via the supplied ns env.
(defun resolve-namespace (elem env)
"Maps the ns prefix to its associated url via the supplied ns env."
(setf (node-name elem) (intern-xml-name (node-name elem) (node-ns elem) env))
(loop
for attr on (node-attrs elem) by #'cddr
do (setf (car attr) (intern-xml-name (caar attr) (cdar attr) env)))
t)Source Context