Skip to content

GitLab

Commit 1b10fb77 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fcompare_buffer_substrings): trt contains Lisp_Objects. 

(transpose_markers): Use marker_position, not Fmarker_position.
parent 80509f2f
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 3 deletions
src/editfns.c
View file @ 1b10fb77
......@@ -1676,8 +1676,8 @@ determines whether case is significant or ignored.")
int c2 = *BUF_CHAR_ADDRESS (bp2, begp2 + i);
if (trt)
{
c1 = trt[c1];
c2 = trt[c2];
c1 = XINT (trt[c1]);
c2 = XINT (trt[c2]);
}
if (c1 < c2)
return make_number (- 1 - i);
......@@ -2369,7 +2369,7 @@ transpose_markers (start1, end1, start2, end2)
for (marker = BUF_MARKERS (current_buffer); !NILP (marker);
marker = XMARKER (marker)->chain)
{
mpos = Fmarker_position (marker);
mpos = marker_position (marker);
if (mpos >= start1 && mpos < end2)
{
if (mpos < end1)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment