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

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

[elpa] externals/ilist c9b456103c 16/24: Fix errors and byte-compile


From: ELPA Syncer
Subject: [elpa] externals/ilist c9b456103c 16/24: Fix errors and byte-compile
Date: Tue, 28 Dec 2021 16:58:14 -0500 (EST)

branch: externals/ilist
commit c9b456103ce867678357d64bf64627b79acd25a6
Author: JSDurand <mmemmew@gmail.com>
Commit: JSDurand <mmemmew@gmail.com>

    Fix errors and byte-compile
    
    * ilist.el (ilist-string, ilist-get-marks, ilist-current-status): Fix
      errors discovered by flymake.
    
    * ilist.elc: byte-compile the file.
---
 ilist.el  |   9 +++------
 ilist.elc | Bin 0 -> 24836 bytes
 2 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/ilist.el b/ilist.el
index 904a4755cd..c910c1295d 100644
--- a/ilist.el
+++ b/ilist.el
@@ -542,9 +542,7 @@ trailing spaces."
                   (concat title-sep (string #xa))
                   'ilist-title-sep t))
            ;; transform back to the format we want
-           (let ((len (length group-strs))
-                 (index 0)
-                 last-row)
+           (let ((index 0))
              (mapcar
               (lambda (element)
                 (setq index (1+ index))
@@ -561,7 +559,6 @@ trailing spaces."
                  ;; rows
                  (mapconcat
                   (lambda (row)
-                    (setq last-row row)
                     (propertize
                      (concat
                       (mapconcat
@@ -807,7 +804,7 @@ If END is non-nil, it specifies the end of the search."
 ;;;; find marks
 
 (defun ilist-get-marks ()
-  "Return the list of marks on the line.
+  "Return the list of mark characters on the line.
 The marks are in descending order, i.e. the mark that occurs
 later on the line come earlier in the result list.
 
@@ -869,7 +866,7 @@ This just sets the text property of `ilist-mark-column' to 
t."
 ;;;; list of items and their marks
 
 (defun ilist-current-status ()
-  "Return the list of items and their marks."
+  "Return the list of items and their mark characters."
   (ilist-map-lines
    (lambda ()
      (cons (get-text-property
diff --git a/ilist.elc b/ilist.elc
new file mode 100644
index 0000000000..c5c4298403
Binary files /dev/null and b/ilist.elc differ



reply via email to

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