diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-06-02 00:28:46 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-06-02 00:28:46 +0000 |
| commit | fe6d5ba6957e93a267c464d9241d90dd072f4684 (patch) | |
| tree | 9a5790ce2e558b1d611e62fb110587934c1bd66c | |
| parent | 2a165caac2abc01a2ef3456d4ec805775bcb38f1 (diff) | |
| download | emacs-fe6d5ba6957e93a267c464d9241d90dd072f4684.tar.gz | |
(Fcompare_buffer_substrings): trt contains Lisp_Objects.
(transpose_markers): Use marker_position, not Fmarker_position.
| -rw-r--r-- | src/editfns.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/editfns.c b/src/editfns.c index a195e15a3a5..0506e37ef50 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -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) |