diff options
Diffstat (limited to 'lisp/net/sasl.el')
| -rw-r--r-- | lisp/net/sasl.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/net/sasl.el b/lisp/net/sasl.el index 289e867e672..3f805237683 100644 --- a/lisp/net/sasl.el +++ b/lisp/net/sasl.el | |||
| @@ -50,8 +50,7 @@ | |||
| 50 | 50 | ||
| 51 | (defvar sasl-unique-id-function #'sasl-unique-id-function) | 51 | (defvar sasl-unique-id-function #'sasl-unique-id-function) |
| 52 | 52 | ||
| 53 | (put 'sasl-error 'error-message "SASL error") | 53 | (define-error 'sasl-error "SASL error") |
| 54 | (put 'sasl-error 'error-conditions '(sasl-error error)) | ||
| 55 | 54 | ||
| 56 | (defun sasl-error (datum) | 55 | (defun sasl-error (datum) |
| 57 | (signal 'sasl-error (list datum))) | 56 | (signal 'sasl-error (list datum))) |