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. */ |