X-Git-Url: http://www.git.cypherpunks.ru/?a=blobdiff_plain;f=t%2Fredo-sh.tests%2Fwhichdo_relative_default_1%2Ftest;fp=t%2Fredo-sh.tests%2Fwhichdo_relative_default_1%2Ftest;h=9ef5597f3f43f470b01cfbbaec21391e21f802c0;hb=a6510ac6225a3a93df9d27dc316a3c1c0fcde426;hp=0000000000000000000000000000000000000000;hpb=a5111e179e5aca57420fd1cc95c1b21e7cd34226;p=goredo.git

diff --git a/t/redo-sh.tests/whichdo_relative_default_1/test b/t/redo-sh.tests/whichdo_relative_default_1/test
new file mode 100755
index 0000000..9ef5597
--- /dev/null
+++ b/t/redo-sh.tests/whichdo_relative_default_1/test
@@ -0,0 +1,22 @@
+#!/bin/sh -eu
+# When invoked with a relative path name with the prefix “default” as
+# an argument, redo-whichdo must not output any dofile filename twice.
+
+default_files="default default.a default.a.b default.do default.a.do default.a.b.do"
+
+for default_file in ${default_files}; do
+ whichdo_dofiles_duplicates=$(
+  redo-whichdo "${default_file}" \
+   |tr '\0' '\n' \
+   |sort \
+   |uniq -d
+ )
+ case "${whichdo_dofiles_duplicates}" in
+  '')
+   ;;
+  *)
+   >&2 printf 'redo-whichdo duplicate output: %s \n' ${whichdo_dofiles_duplicates}
+   exit 1
+  ;;
+ esac
+done