[StGIT PATCH 2/2] Regression test for "stg mail"
From: Karl Hasselström <kha@treskal.com>
Signed-off-by: Karl Hasselström <kha@treskal.com>
---
t/t1900-mail.sh | 34 ++++++++++++++++++++++++++++++++++
1 files changed, 34 insertions(+), 0 deletions(-)
diff --git a/t/t1900-mail.sh b/t/t1900-mail.sh
new file mode 100755
index 0000000..6a950b4
--- /dev/null
+++ b/t/t1900-mail.sh
@@ -0,0 +1,34 @@
+#!/bin/sh
+# Copyright (c) 2006 Karl Hasselström
+test_description='Test the mail command'
+. ./test-lib.sh
+
+test_expect_success \
+ 'Initialize the StGIT repository' \
+ '
+ for i in 1 2 3 4 5; do
+ touch foo.txt &&
+ echo "line $i" >> foo.txt &&
+ git add foo.txt &&
+ git commit -a -m "Patch $i"
+ done &&
+ stg init &&
+ stg uncommit -n 5 foo
+ '
+
+test_expect_success \
+ 'Put all the patches in an mbox' \
+ 'stg mail --to="Inge Ström <inge@example.com>" -a -m \
+ -t ../../templates/patchmail.tmpl > mbox0'
+
+test_expect_success \
+ 'Import the mbox and compare' \
+ '
+ t1=$(git cat-file -p $(stg id) | grep ^tree)
+ stg pop -a &&
+ stg import -M mbox0 &&
+ t2=$(git cat-file -p $(stg id) | grep ^tree) &&
+ [ "$t1" == "$t2" ]
+ '
+
Karl Hasselström <kha@treskal.com>