comparison src/buffer.c @ 18105:bc690c1e1950

(Fmove_overlay): Clean up setting o_beg and o_end.
author Richard M. Stallman <rms@gnu.org>
date Mon, 02 Jun 1997 00:24:11 +0000
parents 7c256846be75
children b45b431879bf
comparison
equal deleted inserted replaced
18104:b2a669ef69b1 18105:bc690c1e1950
2817 if (!NILP (obuffer)) 2817 if (!NILP (obuffer))
2818 { 2818 {
2819 Lisp_Object o_beg; 2819 Lisp_Object o_beg;
2820 Lisp_Object o_end; 2820 Lisp_Object o_end;
2821 2821
2822 o_beg = OVERLAY_START (overlay); 2822 o_beg = OVERLAY_POSITION (OVERLAY_START (overlay));
2823 o_end = OVERLAY_END (overlay); 2823 o_end = OVERLAY_POSITION (OVERLAY_END (overlay));
2824 o_beg = OVERLAY_POSITION (o_beg);
2825 o_end = OVERLAY_POSITION (o_end);
2826 2824
2827 modify_overlay (ob, XINT (o_beg), XINT (o_end)); 2825 modify_overlay (ob, XINT (o_beg), XINT (o_end));
2828 } 2826 }
2829 2827
2830 /* Redisplay where the overlay is going to be. */ 2828 /* Redisplay where the overlay is going to be. */
2835 { 2833 {
2836 Lisp_Object o_beg; 2834 Lisp_Object o_beg;
2837 Lisp_Object o_end; 2835 Lisp_Object o_end;
2838 int change_beg, change_end; 2836 int change_beg, change_end;
2839 2837
2840 o_beg = OVERLAY_START (overlay); 2838 o_beg = OVERLAY_POSITION (OVERLAY_START (overlay));
2841 o_end = OVERLAY_END (overlay); 2839 o_end = OVERLAY_POSITION (OVERLAY_END (overlay));
2842 o_beg = OVERLAY_POSITION (o_beg);
2843 o_end = OVERLAY_POSITION (o_end);
2844 2840
2845 if (XINT (o_beg) == XINT (beg)) 2841 if (XINT (o_beg) == XINT (beg))
2846 modify_overlay (b, XINT (o_end), XINT (end)); 2842 modify_overlay (b, XINT (o_end), XINT (end));
2847 else if (XINT (o_end) == XINT (end)) 2843 else if (XINT (o_end) == XINT (end))
2848 modify_overlay (b, XINT (o_beg), XINT (beg)); 2844 modify_overlay (b, XINT (o_beg), XINT (beg));