tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-list: Silence byte-compiler (part 2)

This commit is contained in:
Nicolas Goaziou 2015-12-05 09:41:14 +01:00
parent 2beaeffef1
commit 43009088b7
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/org-list.el
View File

@ -1050,7 +1050,7 @@ that value."
(let ((seq 0) (pos item) counter)
(while (and (not (setq counter (org-list-get-counter pos struct)))
(setq pos (org-list-get-prev-item pos struct prevs)))
(incf seq))
(cl-incf seq))
(if (not counter) (1+ seq)
(cond
((string-match "[A-Za-z]" counter)
@ -2514,8 +2514,8 @@ With optional prefix argument ALL, do this for the whole buffer."
(lambda (e)
(org-list-get-checkbox e s))
items))))
(incf c-all (length cookies))
(incf c-on (cl-count "[X]" cookies :test #'equal)))))))
(cl-incf c-all (length cookies))
(cl-incf c-on (cl-count "[X]" cookies :test #'equal)))))))
cookies-list cache)
;; Move to start.
(cond (all (goto-char (point-min)))