[Emacs-diffs] feature/aptel/dynamic-modules-rc5 cb89512 03/20: gitmerge: Try to detect cherry-picks

[Teodor Zlatanov]

branch: feature/aptel/dynamic-modules-rc5
commit cb89512f6cf651ed5623ba3f13e32044f14beb48
Author: David Engster <address@hidden>
Commit: Ted Zlatanov <address@hidden>

    gitmerge: Try to detect cherry-picks
    
    * admin/gitmerge.el (gitmerge-default-branch): Change to
    origin/emacs-25.
    (gitmerge-missing): Use symmetric difference ('...') between
    branch and master so that cherry-picks can be detected.
---
 admin/gitmerge.el |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/admin/gitmerge.el b/admin/gitmerge.el
index c8cf2dc..4197ac3 100644
--- a/admin/gitmerge.el
+++ b/admin/gitmerge.el
@@ -65,7 +65,7 @@ Auto-commit"
   '((t (:strike-through t)))
   "Face for skipped commits.")
 
-(defconst gitmerge-default-branch "origin/emacs-24"
+(defconst gitmerge-default-branch "origin/emacs-25"
   "Default for branch that should be merged.")
 
 (defconst gitmerge-buffer "*gitmerge*"
@@ -183,8 +183,8 @@ if and why this commit should be skipped."
     ;; Go through the log and remember all commits that match
     ;; `gitmerge-skip-regexp' or are marked by --cherry-mark.
     (with-temp-buffer
-      (call-process "git" nil t nil "log" "--cherry-mark" from
-                   (concat "^" (car (vc-git-branches))))
+      (call-process "git" nil t nil "log" "--cherry-mark"
+                   (concat from "..." (car (vc-git-branches))))
       (goto-char (point-max))
       (while (re-search-backward "^commit \\(.+\\) \\([0-9a-f]+\\).*" nil t)
        (let ((cherrymark (match-string 1))