Browse Source

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

Nicolas Goaziou 9 years ago
parent
commit
43009088b7
1 changed files with 3 additions and 3 deletions
  1. 3 3
      lisp/org-list.el

+ 3 - 3
lisp/org-list.el

@@ -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)))