diff options
author | Kim F. Storm <storm@cua.dk> | 2006-07-18 13:29:40 +0000 |
---|---|---|
committer | Kim F. Storm <storm@cua.dk> | 2006-07-18 13:29:40 +0000 |
commit | 7068139eccced88fc812aedc97dd2592c7f057d0 (patch) | |
tree | 3266e312b5f31f940738341be572f35d37c07797 /src/textprop.c | |
parent | 56bd218726c232883bf2365f60afa1299d018a17 (diff) | |
download | emacs-7068139eccced88fc812aedc97dd2592c7f057d0.tar.gz |
(text_read_only): Use xsignal0, xsignal1.
Diffstat (limited to 'src/textprop.c')
-rw-r--r-- | src/textprop.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/textprop.c b/src/textprop.c index 0318d12913f..b89d73a7ef9 100644 --- a/src/textprop.c +++ b/src/textprop.c @@ -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); } |