emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/undo-fu 3957d8d188 79/82: Cleanup: replace member with mem


From: ELPA Syncer
Subject: [nongnu] elpa/undo-fu 3957d8d188 79/82: Cleanup: replace member with memq
Date: Thu, 7 Jul 2022 12:04:56 -0400 (EDT)

branch: elpa/undo-fu
commit 3957d8d188a14db7a8c6d58b011d09aecbd42a05
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Cleanup: replace member with memq
    
    No need for member as symbols are being compared.
---
 undo-fu.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/undo-fu.el b/undo-fu.el
index 8862d6672a..8367c25641 100644
--- a/undo-fu.el
+++ b/undo-fu.el
@@ -248,7 +248,7 @@ Optional argument ARG The number of steps to redo."
     ;; This allows explicitly over-stepping the boundary,
     ;; in cases when users want to bypass this constraint.
     (when undo-fu--respect
-      (when (member last-command (list undo-fu-quit-command 
'undo-fu-disable-checkpoint))
+      (when (memq last-command (list undo-fu-quit-command 
'undo-fu-disable-checkpoint))
         (undo-fu--checkpoint-disable)
         (message "Redo checkpoint stepped over!")))
 
@@ -350,7 +350,7 @@ Optional argument ARG the number of steps to undo."
     ;; This allows explicitly over-stepping the boundary,
     ;; in cases when users want to bypass this constraint.
     (when undo-fu--respect
-      (when (member last-command (list undo-fu-quit-command 
'undo-fu-disable-checkpoint))
+      (when (memq last-command (list undo-fu-quit-command 
'undo-fu-disable-checkpoint))
         (undo-fu--checkpoint-disable)
         (message "Undo checkpoint ignored!")))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]