From fd7f3c8821d346a008af1ada3128a88ad5be7bdf Mon Sep 17 00:00:00 2001 From: ueno Date: Wed, 12 Apr 2006 05:46:29 +0000 Subject: [PATCH] Use eq instead of eql. --- epg-file.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/epg-file.el b/epg-file.el index 19cda1c..f7790ed 100644 --- a/epg-file.el +++ b/epg-file.el @@ -160,7 +160,7 @@ Part of the job of this function is setting `buffer-undo-list' appropriately." ;; remove it and get ready to replace it later. ;; In the mean time, turn off undo recording. (let ((last (car-safe buffer-undo-list))) - (if (and (consp last) (eql (car last) from) (eql (cdr last) to)) + (if (and (consp last) (eq (car last) from) (eq (cdr last) to)) (setq undo-list-saved (cdr buffer-undo-list) buffer-undo-list t)))) (narrow-to-region from to) -- 1.7.10.4