diff options
| author | Andreas Schwab | 2003-11-07 16:05:26 +0000 |
|---|---|---|
| committer | Andreas Schwab | 2003-11-07 16:05:26 +0000 |
| commit | 461f3ad082d7b570f6ca7d30f87946b76883fbeb (patch) | |
| tree | 22085fa2e940409c7a9c873a9f1d14d42bd2aabb | |
| parent | 7453c3ac5b14d63c3158df70bf0555fca21d061c (diff) | |
| download | emacs-461f3ad082d7b570f6ca7d30f87946b76883fbeb.tar.gz emacs-461f3ad082d7b570f6ca7d30f87946b76883fbeb.zip | |
(xml-parse-dtd): Fix misplaced paren.
| -rw-r--r-- | lisp/xml.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/xml.el b/lisp/xml.el index 279fe48b16b..a6159554b3f 100644 --- a/lisp/xml.el +++ b/lisp/xml.el | |||
| @@ -546,7 +546,7 @@ This follows the rule [28] in the XML specifications." | |||
| 546 | ;; rule [45]: the element declaration must be unique | 546 | ;; rule [45]: the element declaration must be unique |
| 547 | (if (assoc element dtd) | 547 | (if (assoc element dtd) |
| 548 | (error "XML: element declarations must be unique in a DTD (<%s>)" | 548 | (error "XML: element declarations must be unique in a DTD (<%s>)" |
| 549 | element) | 549 | element)) |
| 550 | 550 | ||
| 551 | ;; Store the element in the DTD | 551 | ;; Store the element in the DTD |
| 552 | (push (list element type) dtd) | 552 | (push (list element type) dtd) |
| @@ -559,7 +559,7 @@ This follows the rule [28] in the XML specifications." | |||
| 559 | 559 | ||
| 560 | ;; Skip the end of the DTD | 560 | ;; Skip the end of the DTD |
| 561 | (search-forward ">")))) | 561 | (search-forward ">")))) |
| 562 | (nreverse dtd)))) | 562 | (nreverse dtd))) |
| 563 | 563 | ||
| 564 | (defun xml-parse-elem-type (string) | 564 | (defun xml-parse-elem-type (string) |
| 565 | "Convert element type STRING into a Lisp structure." | 565 | "Convert element type STRING into a Lisp structure." |