diff options
Diffstat (limited to 'lisp/nxml/rng-cmpct.el')
| -rw-r--r-- | lisp/nxml/rng-cmpct.el | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/lisp/nxml/rng-cmpct.el b/lisp/nxml/rng-cmpct.el index 111dab82633..6697195cebb 100644 --- a/lisp/nxml/rng-cmpct.el +++ b/lisp/nxml/rng-cmpct.el @@ -45,13 +45,8 @@ Return a pattern." ;;; Error handling -(put 'rng-c-incorrect-schema - 'error-conditions - '(error rng-error nxml-file-parse-error rng-c-incorrect-schema)) - -(put 'rng-c-incorrect-schema - 'error-message - "Incorrect schema") +(define-error 'rng-c-incorrect-schema + "Incorrect schema" '(rng-error nxml-file-parse-error)) (defun rng-c-signal-incorrect-schema (filename pos message) (nxml-signal-file-parse-error filename |