Bladeren bron

org-attach: Use cl-lib

* lisp/org-attach.el (org-attach-commit): Use "cl-" prefix.
Nicolas Goaziou 8 jaren geleden
bovenliggende
commit
a8a9c286e9
1 gewijzigde bestanden met toevoegingen van 4 en 5 verwijderingen
  1. 4 5
      lisp/org-attach.el

+ 4 - 5
lisp/org-attach.el

@@ -37,10 +37,9 @@
 
 ;;; Code:
 
-(eval-when-compile
-  (require 'cl))
-(require 'org-id)
+(require 'cl-lib)
 (require 'org)
+(require 'org-id)
 (require 'vc-git)
 
 (defgroup org-attach nil
@@ -336,12 +335,12 @@ This checks for the existence of a \".git\" directory in that directory."
                        org-attach-git-annex-cutoff))
               (call-process "git" nil nil nil "annex" "add" new-or-modified)
             (call-process "git" nil nil nil "add" new-or-modified))
-	    (incf changes))
+	    (cl-incf changes))
 	(dolist (deleted
 		 (split-string
 		  (shell-command-to-string "git ls-files -z --deleted") "\0" t))
 	  (call-process "git" nil nil nil "rm" deleted)
-	  (incf changes))
+	  (cl-incf changes))
 	(when (> changes 0)
 	  (shell-command "git commit -m 'Synchronized attachments'"))))))