Add test for -version-string flag

Author: n-peugnet

main_test.go

@@ -417,13 +417,14 @@ stringer [flags] -type T files...`,
 	}
 }
 
-func setup(t *testing.T) string {
+func setup(t *testing.T, args ...string) string {
 	t.Helper()
 	prevArgs := os.Args
 	t.Cleanup(func() { os.Args = prevArgs })
 	tmp := t.TempDir()
 	out := filepath.Join(tmp, "out")
-	os.Args = []string{"gohelp2man", "-output", out, "testdata/test.sh"}
+	os.Args = append([]string{"gohelp2man"}, args...)
+	os.Args = append(os.Args, "-output", out, "testdata/test.sh")
 	return out
 }
 
@@ -437,9 +438,12 @@ func TestFull(t *testing.T) {
 	for _, c := range cases {
 		t.Run(c, func(t *testing.T) {
 			basename := filepath.Join("testdata", "test_full_"+c)
-			out := setup(t)
-			last := len(os.Args) - 1
-			os.Args = append(os.Args[:last], "-opt-include", basename+".h2m", os.Args[last])
+			args := []string{"-opt-include", basename + ".h2m"}
+			if strargs, err := os.ReadFile(basename + ".args"); err == nil {
+				f := func(r rune) bool { return r == '\n' || r == '\r' }
+				args = append(args, strings.FieldsFunc(string(strargs), f)...)
+			}
+			out := setup(t, args...)
 			t.Setenv("GOHELP2MAN_TESTCASE", basename+".txt")
 			t.Setenv("SOURCE_DATE_EPOCH", "0")
 			main()

testdata/test_full_escapes.1

@@ -1,5 +1,5 @@
 .\" Generated by gohelp2man (devel); DO NOT EDIT.
-.TH .BR\(dqCMD 1 1970-01-01 ".br\(dqcmd"
+.TH .BR\(dqCMD 1 1970-01-01 ".br\(dqcmd v3.1.0\-beta.1"
 .SH NAME
 \&.br"cmd \- command that contains a double quote and starts with a dot
 .SH SYNOPSIS

testdata/test_full_escapes.args

@@ -0,0 +1,2 @@
+-version-string
+v3.1.0-beta.1

testdata/update.sh

@@ -1,7 +1,7 @@
 #!/bin/sh
 export SOURCE_DATE_EPOCH=0
-set -x
 for f in testdata/test_full_*.txt
 do
-	GOHELP2MAN_TESTCASE=$f go run . -opt-include "${f%.txt}.h2m" "testdata/test.sh" > "${f%.txt}.1"
+	cat "${f%.txt}.args" 2> /dev/null \
+	| xargs -d'\n' sh -x -c "GOHELP2MAN_TESTCASE=$f go run . -opt-include ${f%.txt}.h2m \"\$@\" testdata/test.sh" "go" > "${f%.txt}.1"
 done