xml.el produces incorrect sexp for empty element.

[Mark A. Hershberger]

Previous patches that I sent on this weren't accepted, I assume,
because they didn't apply cleanly.  I fixed my CVS, so this should
work.

2003-05-30  Mark A. Hershberger  <mah@everybody.org>

        * xml.el (xml-parse-tag): Fixed incorrect handling of empty elements.

*** xml.el.~1.18.~      Thu Mar 20 12:01:04 2003
--- xml.el      Fri May 16 21:24:11 2003
***************
*** 222,228 ****
        (if (looking-at "/[ \t\n\r]*>")
          (progn
            (forward-char 2)
!           (nreverse (cons '("") children)))
  
        ;; is this a valid start tag ?
        (if (eq (char-after) ?>)
--- 222,228 ----
        (if (looking-at "/[ \t\n\r]*>")
          (progn
            (forward-char 2)
!           (list children))
  
        ;; is this a valid start tag ?
        (if (eq (char-after) ?>)