summaryrefslogtreecommitdiff
path: root/tests/test-reconcile--check-for-open-work.el
diff options
context:
space:
mode:
authorCraig Jennings <c@cjennings.net>2026-05-10 02:44:10 -0500
committerCraig Jennings <c@cjennings.net>2026-05-10 02:44:10 -0500
commit014021e01f6747fad242568e2ce735dbb23b71ff (patch)
tree8c4bb709f1f92cbdc13e15c78a3ee4d0a75219d6 /tests/test-reconcile--check-for-open-work.el
parent4c70819134837f41d9c56abbcd0c6d05de7bbcfd (diff)
downloaddotemacs-014021e01f6747fad242568e2ce735dbb23b71ff.tar.gz
dotemacs-014021e01f6747fad242568e2ce735dbb23b71ff.zip
Make repo reconciliation review-first
Stop automatically stashing, pulling, and popping dirty repos during reconciliation. Clean repos still pull, dirty repos open Magit for review, and results now include structured statuses, skip reasons, pruning, and a summary.
Diffstat (limited to 'tests/test-reconcile--check-for-open-work.el')
-rw-r--r--tests/test-reconcile--check-for-open-work.el14
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/test-reconcile--check-for-open-work.el b/tests/test-reconcile--check-for-open-work.el
index e4615dab..37a5d0a3 100644
--- a/tests/test-reconcile--check-for-open-work.el
+++ b/tests/test-reconcile--check-for-open-work.el
@@ -177,5 +177,19 @@ Regression: lexical-binding + `(boundp 'base-dir)' used to silently skip this."
(cj/check-for-open-work))
(should (cl-some (lambda (m) (string-match-p "Complete\\." m)) messages)))))
+(ert-deftest test-reconcile-check-for-open-work-normal-summary-counts-statuses ()
+ "Summary reports pulled, review, skipped, and failed counts."
+ (let ((summary (cj/reconcile--summary-message
+ '((:status pulled)
+ (:status needs-review)
+ (:status skipped :reason skipped-remote)
+ (:status pull-failed)
+ (:status status-failed)))))
+ (should (string-match-p "Repositories checked: 5" summary))
+ (should (string-match-p "pulled: 1" summary))
+ (should (string-match-p "needs review: 1" summary))
+ (should (string-match-p "skipped: 1" summary))
+ (should (string-match-p "failed: 2" summary))))
+
(provide 'test-reconcile--check-for-open-work)
;;; test-reconcile--check-for-open-work.el ends here