# HG changeset patch # User Ken Raeburn # Date 965745489 0 # Node ID 9193f208ef24905aaf1feeaf82240dfa7a054fa7 # Parent 13034314ea4cc676ae39b184c95a1509355a7350 (find_field): Use EQ, not ==, to compare lisp objects. diff -r 13034314ea4c -r 9193f208ef24 src/editfns.c --- a/src/editfns.c Tue Aug 08 14:37:26 2000 +0000 +++ b/src/editfns.c Tue Aug 08 14:38:09 2000 +0000 @@ -440,7 +440,7 @@ 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 @@ 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);