diff --git a/lisp/org-attach-git.el b/lisp/org-attach-git.el index 1dbc2b746..cafead69e 100644 --- a/lisp/org-attach-git.el +++ b/lisp/org-attach-git.el @@ -80,12 +80,12 @@ Signals an error if the file content is not available and it was not retrieved." (message "Running git annex get \"%s\"." path-relative) (call-process "git" nil nil nil "annex" "get" path-relative))))) -(defun org-attach-git-commit (&optional attach-dir) +(defun org-attach-git-commit (&optional _) "Commit changes to git if `org-attach-id-dir' is properly initialized. This checks for the existence of a \".git\" directory in that directory. -Takes one optional argument ATTACH-DIR for the sake of being -compatible with hook `org-attach-after-change-hook'." +Takes an unused optional argument for the sake of being compatible +with hook `org-attach-after-change-hook'." (let* ((dir (expand-file-name org-attach-id-dir)) (git-dir (vc-git-root dir)) (use-annex (org-attach-git-use-annex))