Mercurial > emacs
comparison src/editfns.c @ 40287:5798240154fd
(text_property_stickiness): Fix Lisp_Object used as boolean.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 25 Oct 2001 04:19:55 +0000 |
| parents | 9d2aeb5c05b4 |
| children | cdfd4d09b79a |
comparison
equal
deleted
inserted
replaced
| 40286:0e7059267f7e | 40287:5798240154fd |
|---|---|
| 362 Lisp_Object rear_non_sticky; | 362 Lisp_Object rear_non_sticky; |
| 363 | 363 |
| 364 prev_pos = make_number (XINT (pos) - 1); | 364 prev_pos = make_number (XINT (pos) - 1); |
| 365 rear_non_sticky = Fget_text_property (prev_pos, Qrear_nonsticky, Qnil); | 365 rear_non_sticky = Fget_text_property (prev_pos, Qrear_nonsticky, Qnil); |
| 366 | 366 |
| 367 if (CONSP (rear_non_sticky) | 367 if (!NILP (CONSP (rear_non_sticky) |
| 368 ? Fmemq (prop, rear_non_sticky) | 368 ? Fmemq (prop, rear_non_sticky) |
| 369 : !NILP (rear_non_sticky)) | 369 : rear_non_sticky)) |
| 370 /* PROP is rear-non-sticky. */ | 370 /* PROP is rear-non-sticky. */ |
| 371 is_rear_sticky = 0; | 371 is_rear_sticky = 0; |
| 372 } | 372 } |
| 373 | 373 |
| 374 /* Consider following character. */ | 374 /* Consider following character. */ |