comparison src/xdisp.c @ 30243:c56062542bae

(display_prop_end, invisible_text_between_p): Call Fnext_single_char_property_change instead of next_single_char_property_change.
author Miles Bader <miles@gnu.org>
date Sat, 15 Jul 2000 15:17:11 +0000
parents 394c884dc496
children a1f02a10e391
comparison
equal deleted inserted replaced
30242:6af73af0f1ef 30243:c56062542bae
2300 struct text_pos start_pos; 2300 struct text_pos start_pos;
2301 { 2301 {
2302 Lisp_Object end; 2302 Lisp_Object end;
2303 struct text_pos end_pos; 2303 struct text_pos end_pos;
2304 2304
2305 end = next_single_char_property_change (make_number (CHARPOS (start_pos)), 2305 end = Fnext_single_char_property_change (make_number (CHARPOS (start_pos)),
2306 Qdisplay, object, Qnil); 2306 Qdisplay, object, Qnil);
2307 CHARPOS (end_pos) = XFASTINT (end); 2307 CHARPOS (end_pos) = XFASTINT (end);
2308 if (STRINGP (object)) 2308 if (STRINGP (object))
2309 compute_string_pos (&end_pos, start_pos, it->string); 2309 compute_string_pos (&end_pos, start_pos, it->string);
2310 else 2310 else
2311 BYTEPOS (end_pos) = CHAR_TO_BYTE (XFASTINT (end)); 2311 BYTEPOS (end_pos) = CHAR_TO_BYTE (XFASTINT (end));
4658 it->window); 4658 it->window);
4659 if (TEXT_PROP_MEANS_INVISIBLE (prop)) 4659 if (TEXT_PROP_MEANS_INVISIBLE (prop))
4660 invisible_found_p = 1; 4660 invisible_found_p = 1;
4661 else 4661 else
4662 { 4662 {
4663 limit = next_single_char_property_change (make_number (start_charpos), 4663 limit = Fnext_single_char_property_change (make_number (start_charpos),
4664 Qinvisible, Qnil, 4664 Qinvisible, Qnil,
4665 make_number (end_charpos)); 4665 make_number (end_charpos));
4666 invisible_found_p = XFASTINT (limit) < end_charpos; 4666 invisible_found_p = XFASTINT (limit) < end_charpos;
4667 } 4667 }
4668 4668
4669 return invisible_found_p; 4669 return invisible_found_p;
4670 } 4670 }