From e89c4e833deb6a55bbb2aa231afebe0fe8bd7f23 Mon Sep 17 00:00:00 2001 From: John Foerch Date: Wed, 10 Feb 2016 17:37:03 -0500 Subject: [PATCH] org-attach: Make use of git optional * lisp/org-attach.el (org-attach-commit): New variable. (org-attach-attach): Use new variable. TINYCHANGE diff --git a/lisp/org-attach.el b/lisp/org-attach.el index 15d4841..ebea435 100644 --- a/lisp/org-attach.el +++ b/lisp/org-attach.el @@ -55,6 +55,14 @@ where the Org file lives." :group 'org-attach :type 'directory) +(defcustom org-attach-commit t + "If non-nil commit attachments with git. +This is only done if the Org file is in a git repository." + :group 'org-attach + :type 'boolean + :version "25.1" + :package-version '(Org . "9.0")) + (defcustom org-attach-git-annex-cutoff (* 32 1024) "If non-nil, files larger than this will be annexed instead of stored." :group 'org-attach @@ -373,7 +381,8 @@ METHOD may be `cp', `mv', `ln', or `lns' default taken from ((eq method 'cp) (copy-file file fname)) ((eq method 'ln) (add-name-to-file file fname)) ((eq method 'lns) (make-symbolic-link file fname))) - (org-attach-commit) + (when org-attach-commit + (org-attach-commit)) (org-attach-tag) (cond ((eq org-attach-store-link-p 'attached) (org-attach-store-link fname)) -- 2.6.4