Function: EMIT-EMPTY-TAG

Documentation

Emit the code required to print an empty tag with name NAME and a attributes ATTRIBUTES. See EMIT-OPEN-TAG for more details.

Source

(defun emit-empty-tag (name &rest attributes)
  "Emit the code required to print an empty tag with name NAME and a
attributes ATTRIBUTES. See EMIT-OPEN-TAG for more details."
  (emit-princ "<" name)
  (mapc #'emit-princ-attributes attributes)
  (emit-indentation)
  (emit-princ "/>"))