File tree Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Original file line number Diff line number Diff line change 63
63
(call-process-region (point-min ) (point-max )
64
64
" lsdiff" nil lsdiff nil )))
65
65
(split-string (buffer-string ))))))
66
+ (log-buffer-name (if amend " *amend*" " *commit*" ))
66
67
(f patch-files) visiting-buffers)
67
68
(while (car f)
68
69
(let ((buf (find-buffer-visiting (car f))))
71
72
(add-to-list 'visiting-buffers buf)))
72
73
(setq f (cdr f)))
73
74
(if amend
74
- (with-current-buffer (get-buffer-create " *commit* " )
75
+ (with-current-buffer (get-buffer-create log-buffer-name )
75
76
(erase-buffer )
76
77
(insert (or (commit-patch-last-log-comment directory) " " ))
77
78
(goto-char 0 )))
@@ -108,7 +109,7 @@ one."
108
109
(delete-file patch))))
109
110
nil
110
111
`((log-edit-listfun . (lambda () ', patch-files )))
111
- " *commit* " )))
112
+ log-buffer-name )))
112
113
113
114
(defun commit-patch-buffer (&optional arg amend )
114
115
" Commit the patch in the current buffer, applying it to the
You can’t perform that action at this time.
0 commit comments