>From 7956862ca5e8f1a795cc0cec0ebe97801c3b1db7 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Mon, 9 Jul 2018 18:59:58 -0700 Subject: [PATCH] * lisp/format.el (format-annotate-single-property-change): Simplify. --- lisp/format.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/format.el b/lisp/format.el index 1222abb..5bf1be3 100644 --- a/lisp/format.el +++ b/lisp/format.el @@ -1000,9 +1000,7 @@ format-annotate-single-property-change (if (not (and (proper-list-p old) (proper-list-p new))) (format-annotate-atomic-property-change prop-alist old new) - (let* ((old (if (listp old) old (list old))) - (new (if (listp new) new (list new))) - close open) + (let (close open) (while old (setq close (append (car (format-annotate-atomic-property-change -- 2.7.4