From fec9cf4af8904cf1a22ace447bf542f1a442a89e Mon Sep 17 00:00:00 2001
From: Stephen Rothwell <sfr@canb.auug.org.au>
Date: Thu, 14 Jul 2022 17:07:16 +1000
Subject: [PATCH] have fetch_commits call check_commits

and check_commits not run gitk
---
 check_commits | 2 +-
 fetch_trees   | 6 ++++++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/check_commits b/check_commits
index 9011cb3..73ad0f6 100755
--- a/check_commits
+++ b/check_commits
@@ -80,4 +80,4 @@ done
 print_commits 'author' "${author_missing[@]}"
 print_commits 'committer' "${committer_missing[@]}"
 
-exec gitk "$@"
+#exec gitk "$@"
diff --git a/fetch_trees b/fetch_trees
index df10800..91d3d8f 100755
--- a/fetch_trees
+++ b/fetch_trees
@@ -79,7 +79,13 @@ for name in $trees; do
 	fun="fetch_$type"
 	tfun=$(type -t "$fun")
 	if [ "$tfun" = 'function' ]; then
+		branch=$(get_field "$name" 5)
+		old_sha=$(git rev-parse "$name/$branch")
 		"$fun" "$name"
+		new_sha=$(git rev-parse "$name/$branch")
+		if ! [ "$new_sha" = "$old_sha" ]; then
+			"$tools_dir"/check_commits ^origin/master "$old_sha..$new_sha"
+		fi
 	fi
 done
 
-- 
2.39.5