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 | 1b10fb7768fd8d7efc6a77634ede39da712cb789 (patch) | |
| tree | 7acb1077d052d4e24592942e4862ce12ebee30cf /src | |
| parent | 80509f2f6e92a9c4cfce9d42347f0cdcbff4e864 (diff) | |
| download | emacs-1b10fb7768fd8d7efc6a77634ede39da712cb789.tar.gz | |
(Fcompare_buffer_substrings): trt contains Lisp_Objects.
(transpose_markers): Use marker_position, not Fmarker_position.
Diffstat (limited to 'src')
| -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) |