From cba7d658d827638ab0b09fbd2e437bfc557e09be Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Tue, 8 Aug 2000 14:38:09 +0000 Subject: [PATCH] (find_field): Use EQ, not ==, to compare lisp objects. --- src/editfns.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/editfns.c b/src/editfns.c index ae6befd5a7f..d3fa9c54f47 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -440,7 +440,7 @@ find_field (pos, merge_at_boundary, beg, end) else /* Find the previous field boundary. */ { - if (!NILP (merge_at_boundary) && before_field == Qboundary) + if (!NILP (merge_at_boundary) && EQ (before_field, Qboundary)) /* Skip a `boundary' field. */ pos = Fprevious_single_char_property_change (pos, Qfield, Qnil,Qnil); @@ -456,7 +456,7 @@ find_field (pos, merge_at_boundary, beg, end) else /* Find the next field boundary. */ { - if (!NILP (merge_at_boundary) && after_field == Qboundary) + if (!NILP (merge_at_boundary) && EQ (after_field, Qboundary)) /* Skip a `boundary' field. */ pos = Fnext_single_char_property_change (pos, Qfield, Qnil, Qnil); -- 2.39.2