diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2017-03-22 22:08:24 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2017-03-22 22:08:24 -0400 |
| commit | 98f8675d40bedba97f74b019383b81cfa73f6d35 (patch) | |
| tree | b6944e1ef440177e40e64a8109fcae58797e89c6 | |
| parent | 6fcf17a2febaf0674ccb00ca59735d03dfbb9a9a (diff) | |
| download | emacs.d-98f8675d40bedba97f74b019383b81cfa73f6d35.tar.gz | |
magit-copy-functions: Mark arguments as unused
| -rw-r--r-- | lisp/km-magit.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/km-magit.el b/lisp/km-magit.el index 8eb67f6..a068eac 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -448,7 +448,7 @@ COMMIT." commit "--"))) (user-error "%s does not exist" commit))) -(defun km/magit-copy-commit-summary-from-header (&optional arg) +(defun km/magit-copy-commit-summary-from-header (&optional _) (magit-section-when headers (km/magit-copy-commit-summary (car magit-refresh-args)))) @@ -459,7 +459,7 @@ COMMIT." (mapconcat #'identity it (if arg (read-string "Separator: ") ", "))))) -(defun km/magit-copy-commit-message (&optional arg) +(defun km/magit-copy-commit-message (&optional _) (magit-section-when message (kill-new (replace-regexp-in-string "^ " "" @@ -476,7 +476,7 @@ COMMIT." (replace-regexp-in-string "^[ \\+\\-]" "" text) text)))))) -(defun km/magit-copy-hunk (&optional arg) +(defun km/magit-copy-hunk (&optional _) (magit-section-when hunk (let ((start (save-excursion (goto-char (magit-section-start it)) (1+ (point-at-eol))))) |