summaryrefslogtreecommitdiff
path: root/lisp/international/kkc.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2013-08-09 17:22:44 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2013-08-09 17:22:44 -0400
commit54bd972f159fb8c25b4f4042ac6db5da557d9108 (patch)
tree02debb972eec68ea4520474aca74d54843f0d708 /lisp/international/kkc.el
parent14ba08227d9272a34a0a95d20640f4bbdd0b6033 (diff)
downloademacs-54bd972f159fb8c25b4f4042ac6db5da557d9108.tar.gz
* lisp/subr.el (define-error): New function.
* doc/lispref/control.texi (Signaling Errors): Refer to define-error. (Error Symbols): Add `define-error'. * doc/lispref/errors.texi (Standard Errors): Don't refer to `error-conditions'. * lisp/progmodes/ada-xref.el (ada-error-file-not-found): Rename from error-file-not-found and define with define-error. * lisp/emacs-lisp/cl-lib.el (cl-assertion-failed): Move here from subr.el and define with define-error. * lisp/userlock.el (file-locked, file-supersession): * lisp/simple.el (mark-inactive): * lisp/progmodes/js.el (js-moz-bad-rpc, js-js-error): * lisp/progmodes/ada-mode.el (ada-mode-errors): * lisp/play/life.el (life-extinct): * lisp/nxml/xsd-regexp.el (xsdre-invalid-regexp, xsdre-parse-error): * lisp/nxml/xmltok.el (xmltok-markup-declaration-parse-error): * lisp/nxml/rng-util.el (rng-error): * lisp/nxml/rng-uri.el (rng-uri-error): * lisp/nxml/rng-match.el (rng-compile-error): * lisp/nxml/rng-cmpct.el (rng-c-incorrect-schema): * lisp/nxml/nxml-util.el (nxml-error, nxml-file-parse-error): * lisp/nxml/nxml-rap.el (nxml-scan-error): * lisp/nxml/nxml-outln.el (nxml-outline-error): * lisp/net/soap-client.el (soap-error): * lisp/net/gnutls.el (gnutls-error): * lisp/net/ange-ftp.el (ftp-error): * lisp/mpc.el (mpc-proc-error): * lisp/json.el (json-error, json-readtable-error, json-unknown-keyword) (json-number-format, json-string-escape, json-string-format) (json-key-format, json-object-format): * lisp/jka-compr.el (compression-error): * lisp/international/quail.el (quail-error): * lisp/international/kkc.el (kkc-error): * lisp/emacs-lisp/ert.el (ert-test-failed): * lisp/calc/calc.el (calc-error, inexact-result, math-overflow) (math-underflow): * lisp/bookmark.el (bookmark-error-no-filename): * lisp/epg.el (epg-error): Define with define-error.
Diffstat (limited to 'lisp/international/kkc.el')
-rw-r--r--lisp/international/kkc.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/kkc.el b/lisp/international/kkc.el
index a7d3ac5d017..13833fad66b 100644
--- a/lisp/international/kkc.el
+++ b/lisp/international/kkc.el
@@ -207,7 +207,7 @@ area while indicating the current selection by `<N>'."
kkc-current-conversions-width nil
kkc-current-conversions (cons 0 nil)))))))
-(put 'kkc-error 'error-conditions '(kkc-error error))
+(define-error 'kkc-error nil)
(defun kkc-error (&rest args)
(signal 'kkc-error (apply 'format args)))