From: Andreas Schwab <schwab@suse.de>
Date: Fri, 7 Nov 2003 16:05:26 +0000 (+0000)
Subject: (xml-parse-dtd): Fix misplaced paren.
X-Git-Tag: ttn-vms-21-2-B4~8406
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=461f3ad082d7b570f6ca7d30f87946b76883fbeb;p=emacs.git

(xml-parse-dtd): Fix misplaced paren.
---

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."
 	    ;;  rule [45]: the element declaration must be unique
 	    (if (assoc element dtd)
 		(error "XML: element declarations must be unique in a DTD (<%s>)"
-		       element)
+		       element))
 
 	    ;;  Store the element in the DTD
 	    (push (list element type) dtd)
@@ -559,7 +559,7 @@ This follows the rule [28] in the XML specifications."
 
 	  ;;  Skip the end of the DTD
 	  (search-forward ">"))))
-    (nreverse dtd))))
+    (nreverse dtd)))
 
 (defun xml-parse-elem-type (string)
   "Convert element type STRING into a Lisp structure."