[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master cc74539 2/2: * lisp/format.el (format-annotate-sing
From: |
Paul Eggert |
Subject: |
[Emacs-diffs] master cc74539 2/2: * lisp/format.el (format-annotate-single-property-change): Simplify. |
Date: |
Mon, 9 Jul 2018 22:00:49 -0400 (EDT) |
branch: master
commit cc74539a19229ee7e70055b00e8334bd6abc0841
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>
* 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 @@ either strings, or lists of the form (PARAMETER VALUE)."
(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