/[emacs]/emacs/lisp/xml.el
ViewVC logotype

Diff of /emacs/lisp/xml.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.40 by hexmode, Wed Dec 1 04:45:08 2004 UTC revision 1.41 by hexmode, Thu Dec 2 06:53:43 2004 UTC
# Line 653  This follows the rule [28] in the XML sp Line 653  This follows the rule [28] in the XML sp
653                                                  xml-validating-parser                                                  xml-validating-parser
654                                                  parse-ns))))))))                                                  parse-ns))))))))
655             (t             (t
656              (error "XML: (Validity) Invalid DTD item")))))              (when xml-validating-parser
657                  (error "XML: (Validity) Invalid DTD item")))))
658        (if (looking-at "\\s-*]>")        (if (looking-at "\\s-*]>")
659            (goto-char (nth 1 (match-data)))))            (goto-char (nth 1 (match-data)))))
660      (nreverse dtd)))      (nreverse dtd)))
# Line 724  This follows the rule [28] in the XML sp Line 725  This follows the rule [28] in the XML sp
725                      (entity                      (entity
726                       (cdr entity))                       (cdr entity))
727                      ((eq (length this-part) 0)                      ((eq (length this-part) 0)
728                       (error "XML: (Validity) No entity given"))                       (when xml-validating-parser
729                           (error "XML: (Validity) No entity given")))
730                      (t                      (t
731                       (if xml-validating-parser                       (when xml-validating-parser
732                           (error "XML: (Validity) Undefined entity `%s'"                           (error "XML: (Validity) Undefined entity `%s'"
733                                  this-part))))))                                  this-part))))))
734    

Legend:
Removed from v.1.40  
changed lines
  Added in v.1.41

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26