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 | d0a29e1de77e4c1c01c46d80b6ac2df06b1df2b3 (patch) | |
| tree | 9aad6c8ac6bc61c5553d730215c7806d4928be09 /src/textprop.c | |
| parent | 9471945bad003c2f944596145e8930e2632c1807 (diff) | |
| download | emacs-d0a29e1de77e4c1c01c46d80b6ac2df06b1df2b3.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); } |