Mercurial > hg > xemacs-beta
diff src/data.c @ 5381:4f39e57a82b4
Improve read-only error reporting.
-------------------- ChangeLog entries follow: --------------------
src/ChangeLog addition:
2011-03-17 Didier Verna <didier@xemacs.org>
* data.c (init_errors_once_early): Define Qextent_read_only error.
* lisp.h: Declare it.
* extents.c (verify_extent_mapper): Signal an extent-read-only
error instead of a buffer-read-only one.
| author | Didier Verna <didier@lrde.epita.fr> |
|---|---|
| date | Thu, 17 Mar 2011 16:20:09 +0100 |
| parents | d967d96ca043 |
| children | 4dee0387b9de |
line wrap: on
line diff
--- a/src/data.c Mon Mar 21 12:27:07 2011 +0000 +++ b/src/data.c Thu Mar 17 16:20:09 2011 +0100 @@ -50,7 +50,8 @@ Lisp_Object Qinvalid_operation, Qinvalid_change, Qprinting_unreadable_object; Lisp_Object Qsetting_constant; Lisp_Object Qediting_error; -Lisp_Object Qbeginning_of_buffer, Qend_of_buffer, Qbuffer_read_only; +Lisp_Object Qbeginning_of_buffer, Qend_of_buffer; +Lisp_Object Qbuffer_read_only, Qextent_read_only; Lisp_Object Qio_error, Qfile_error, Qconversion_error, Qend_of_file; Lisp_Object Qtext_conversion_error; Lisp_Object Qarith_error, Qrange_error, Qdomain_error; @@ -3493,6 +3494,7 @@ DEFERROR_STANDARD (Qbeginning_of_buffer, Qediting_error); DEFERROR_STANDARD (Qend_of_buffer, Qediting_error); DEFERROR (Qbuffer_read_only, "Buffer is read-only", Qediting_error); + DEFERROR (Qextent_read_only, "Extent is read-only", Qediting_error); DEFERROR (Qio_error, "IO Error", Qinvalid_operation); DEFERROR_STANDARD (Qfile_error, Qio_error);