mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-14 16:50:58 +00:00
Code Issues Releases Activity

(text_read_only): Use xsignal0, xsignal1.

Browse Source
This commit is contained in:
Kim F. Storm 2006-07-18 13:29:40 +00:00
parent 9471945bad
commit d0a29e1de7
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/textprop.c
View File

@ -86,7 +86,10 @@ static void
text_read_only (propval)
Lisp_Object propval;
{
Fsignal (Qtext_read_only, STRINGP (propval) ? Fcons (propval, Qnil) : Qnil);
if (STRINGP (propval))
xsignal1 (Qtext_read_only, propval);
xsignal0 (Qtext_read_only);
}