Mercurial > hg > xemacs-beta
comparison src/indent.c @ 2506:8c96bdabcaf9
[xemacs-hg @ 2005-01-26 05:11:01 by ben]
implement next-single-char-property-change and friends
extents.c, extents.h, indent.c, syntax.c: Implement next/previous-single-char-property-change and make
next/previous-single-property-change work like in FSF.
author | ben |
---|---|
date | Wed, 26 Jan 2005 05:11:12 +0000 |
parents | fffe735e63ee |
children | facf3239ba30 |
comparison
equal
deleted
inserted
replaced
2505:3e5a2d0d57e1 | 2506:8c96bdabcaf9 |
---|---|
69 { | 69 { |
70 Lisp_Object buffer; | 70 Lisp_Object buffer; |
71 Lisp_Object value; | 71 Lisp_Object value; |
72 | 72 |
73 buffer = wrap_buffer (buf); | 73 buffer = wrap_buffer (buf); |
74 value = Fprevious_single_property_change (make_int (pos), Qinvisible, | 74 value = Fprevious_single_char_property_change (make_int (pos), Qinvisible, |
75 buffer, Qnil); | 75 buffer, Qnil); |
76 if (NILP (value)) | 76 if (NILP (value)) |
77 return 0; /* no visible position found */ | 77 return 0; /* no visible position found */ |
78 else | 78 else |
79 /* #### bug bug bug!!! This will return the position of the beginning | 79 /* #### bug bug bug!!! This will return the position of the beginning |
80 of an invisible extent; this extent is very likely to be start-closed, | 80 of an invisible extent; this extent is very likely to be start-closed, |