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

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

[nongnu] elpa/annotate e2840072db 032/372: undo last change, didn't fix


From: ELPA Syncer
Subject: [nongnu] elpa/annotate e2840072db 032/372: undo last change, didn't fix warning
Date: Fri, 4 Feb 2022 16:58:16 -0500 (EST)

branch: elpa/annotate
commit e2840072dbdfe0c3ea993e6bea08bacd5bf277fa
Author: Bastian <basti@bastibe.de>
Commit: Bastian <basti@bastibe.de>

    undo last change, didn't fix warning
    
    I'd rather require cl than not use destrucuring-bind and remove-if.
---
 annotate.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/annotate.el b/annotate.el
index a370cecddf..e2b1afdda2 100644
--- a/annotate.el
+++ b/annotate.el
@@ -5,7 +5,7 @@
 ;; Maintainer: Bastian Bechtold
 ;; URL: https://github.com/bastibe/annotate.el
 ;; Created: 2015-06-10
-;; Version: 0.2.1
+;; Version: 0.2.2
 
 ;; This file is NOT part of GNU Emacs.
 
@@ -41,11 +41,12 @@
 ;; the right margin. Annotations are saved whenever the file is saved.
 
 ;;; Code:
+(require 'cl)
 
 ;;;###autoload
 (defgroup annotate nil
   "Annotate files without changing them."
-  :version "0.2.1"
+  :version "0.2.2"
   :group 'text)
 
 ;;;###autoload
@@ -109,8 +110,8 @@
     (cond ((and (overlayp overlay) (overlay-get overlay 'annotation))
            (annotate-change-annotation (point)))
           (t
-           (let ((bounds (annotate-bounds)))
-             (annotate-create-annotation (car bounds) (cadr bounds)))))))
+           (destructuring-bind (start end) (annotate-bounds)
+             (annotate-create-annotation start end))))))
 
 ;;;###autoload
 (defun annotate-save-annotations ()



reply via email to

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