From: Ken Raeburn <raeburn@raeburn.org>
Date: Tue, 8 Aug 2000 14:38:09 +0000 (+0000)
Subject: (find_field): Use EQ, not ==, to compare lisp objects.
X-Git-Tag: emacs-pretest-21.0.90~2418
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/cba7d658d827638ab0b09fbd2e437bfc557e09be

(find_field): Use EQ, not ==, to compare lisp objects.
---

diff --git a/src/editfns.c b/src/editfns.c
index ae6befd5a7..d3fa9c54f4 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);