fixed catalog error handling

2005-12-17 22:30:19 +00:00
parent 5363dadbb8
commit 8ae5713469
1 changed files with 1 additions and 1 deletions
--- a/xml/catalog.lisp
+++ b/xml/catalog.lisp
@ -223,7 +223,7 @@
  (handler-case
      (parse-catalog-file/strict uri)
    (file-error () nil)
-    (parser-error () nil)))
+    (xml-parse-error () nil)))
 (defparameter *catalog-dtd*
    (let* ((cxml