diff options
Diffstat (limited to 'lisp/nxml/rng-match.el')
| -rw-r--r-- | lisp/nxml/rng-match.el | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/nxml/rng-match.el b/lisp/nxml/rng-match.el index 3c949ada668..36bd23b3768 100644 --- a/lisp/nxml/rng-match.el +++ b/lisp/nxml/rng-match.el @@ -1541,14 +1541,7 @@ nullable and y1 isn't, return a choice (signal 'rng-compile-error (list (apply 'format args)))) -(put 'rng-compile-error - 'error-conditions - '(error rng-error rng-compile-error)) - -(put 'rng-compile-error - 'error-message - "Incorrect schema") - +(define-error 'rng-compile-error "Incorrect schema" 'rng-error) ;;; External API |