branch: elpa/undo-fu-session
commit 76a47f00e366ff439a363b20afd15506bcf1f77c
Author: Campbell Barton <[email protected]>
Commit: Campbell Barton <[email protected]>
Cleanup: avoid unnecessary list allocation in linear-undo-list
---
undo-fu-session.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/undo-fu-session.el b/undo-fu-session.el
index fa45a0920bb..54ed5966f7c 100755
--- a/undo-fu-session.el
+++ b/undo-fu-session.el
@@ -220,12 +220,12 @@ ignoring all branches that aren't included in the current
undo state."
(setq linear-list (cdr linear-list)))
;; Pass through 'nil', when there is no undo information.
- ;; Also convert '(list nil)' to 'nil', since this is no undo info too.
+ ;; Also convert '(nil)' to 'nil', since this is no undo info too.
;;
;; Note that we use 'nil' as this is what `buffer-undo-list' is set
;; to when there are no undo steps yet.
(cond
- ((and linear-list (null (equal (list nil) linear-list)))
+ ((and linear-list (null (equal '(nil) linear-list)))
linear-list)
(t
nil))))
