scratch/igc/weak-undo-list 49f279dada2: * src/undo.c (scrub_undo_list): Use !BASE_EQ instead of !=.

branch: scratch/igc/weak-undo-list
commit 49f279dada262aa4b28b151b9650a38479ff4e40
Author: Helmut Eller <[email protected]>
Commit: Helmut Eller <[email protected]>

    * src/undo.c (scrub_undo_list): Use !BASE_EQ instead of !=.
---
 src/undo.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/undo.c b/src/undo.c
index ebd397949ef..b749a863a58 100644
--- a/src/undo.c
+++ b/src/undo.c
@@ -193,7 +193,7 @@ scrub_undo_list (Lisp_Object list)
 	  Lisp_Object head = Fnthcdr (make_fixnum (4), entry);
 	  Lisp_Object pairs
 	    = scrub_id_offset_pairs (htab, XCDR (head));
-	  if (pairs != XCDR (head))
+	  if (!BASE_EQ (pairs, XCDR (head)))
 	    XSETCDR (head, pairs);
 	  drop = NILP (pairs);
 	}