aboutsummaryrefslogtreecommitdiffstats
path: root/admin
diff options
context:
space:
mode:
authorGlenn Morris2018-01-15 12:43:16 -0800
committerGlenn Morris2018-01-15 12:43:16 -0800
commit7d6a6b4a4c701b7900809e6209de42f2dc14e1e3 (patch)
tree2b19b78e188c21758a6202ebb555c73b913636ca /admin
parent597ede7e5b3c965f1653d15c964e86ccb989a62f (diff)
downloademacs-7d6a6b4a4c701b7900809e6209de42f2dc14e1e3.tar.gz
emacs-7d6a6b4a4c701b7900809e6209de42f2dc14e1e3.zip
Small improvement for noninteractive gitmerge
* admin/gitmerge.el (gitmerge-resolve-unmerged): In batch mode, report conflicted files.
Diffstat (limited to 'admin')
-rw-r--r--admin/gitmerge.el9
1 files changed, 7 insertions, 2 deletions
diff --git a/admin/gitmerge.el b/admin/gitmerge.el
index 6011d9bd38f..e676e8fa025 100644
--- a/admin/gitmerge.el
+++ b/admin/gitmerge.el
@@ -448,8 +448,13 @@ Throw an user-error if we cannot resolve automatically."
448 (erase-buffer) 448 (erase-buffer)
449 (insert "For the following files, conflicts could\n" 449 (insert "For the following files, conflicts could\n"
450 "not be resolved automatically:\n\n") 450 "not be resolved automatically:\n\n")
451 (call-process "git" nil t nil 451 (let ((conflicts
452 "diff" "--name-only" "--diff-filter=U") 452 (with-temp-buffer
453 (call-process "git" nil t nil
454 "diff" "--name-only" "--diff-filter=U")
455 (buffer-string))))
456 (insert conflicts)
457 (if noninteractive (message "Conflicts in:\n%s" conflicts)))
453 (insert "\nResolve the conflicts manually, then run gitmerge again." 458 (insert "\nResolve the conflicts manually, then run gitmerge again."
454 "\nNote:\n - You don't have to add resolved files or " 459 "\nNote:\n - You don't have to add resolved files or "
455 "commit the merge yourself (but you can)." 460 "commit the merge yourself (but you can)."