diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/km-magit.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/km-magit.el b/lisp/km-magit.el index fa4a208..08ddd06 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -50,7 +50,7 @@ a proper commit." (interactive) (magit-run-git "commit" "--all" "--message=auto")) -(defun km/magit-update-or-auto-commit (&optional no-directory) +(defun km/magit-update-or-auto-commit (&optional full-name) (interactive "P") (let ((files (delete-dups (nconc (magit-unstaged-files) (magit-staged-files))))) @@ -59,9 +59,9 @@ a proper commit." (1 (let ((file (car files))) (magit-run-git "commit" "--all" "--message" - (concat (funcall (if no-directory - #'file-name-nondirectory - #'identity) + (concat (funcall (if full-name + #'identity + #'file-name-nondirectory) file) (and (magit-rev-verify (concat "HEAD:" file)) ": Update"))))) |