t/clean                  | 6 ++++++
 t/clean.do               | 2 --
 t/redo-sh.tests/clean    | 6 ++++++
 t/redo-sh.tests/clean.do | 4 ----

diff --git a/t/clean b/t/clean
new file mode 100755
index 0000000000000000000000000000000000000000..55f8fe6bd7629c25f3ba1fe0e5b51af08284ff940bbbffc3c43321ad75ff67b4
--- /dev/null
+++ b/t/clean
@@ -0,0 +1,6 @@
+#!/bin/sh -e
+
+cd "$(dirname "$(realpath -- "$0")")"
+redo apenwarr/clean
+( cd redo-sh.tests ; ./clean )
+for d in apenwarr redo-sh.tests ; do ( cd $d ; redo-cleanup full >/dev/null ) ; done
diff --git a/t/clean.do b/t/clean.do
deleted file mode 100644
index 2169a3222f2308d19209a2de75d616033bac17b4f481ee3e49c05eed8143de9c..0000000000000000000000000000000000000000
--- a/t/clean.do
+++ /dev/null
@@ -1,2 +0,0 @@
-redo apenwarr/clean redo-sh.tests/clean
-for d in apenwarr redo-sh.tests ; do ( cd $d ; redo-cleanup full >/dev/null ) ; done
diff --git a/t/redo-sh.tests/clean b/t/redo-sh.tests/clean
new file mode 100755
index 0000000000000000000000000000000000000000..29d98eb5d713c847823d4424a05d1ea92a0b316b8c62b2786fb898dd0e9aac98
--- /dev/null
+++ b/t/redo-sh.tests/clean
@@ -0,0 +1,6 @@
+#!/bin/sh -e
+
+for f in * ; do
+    [ -d $f ] || continue
+    find $f ! -name test -delete
+done
diff --git a/t/redo-sh.tests/clean.do b/t/redo-sh.tests/clean.do
deleted file mode 100644
index 0b4f0e8cc1db59dc4dc8589fe1788c167d6817c6d9da0f79647a0895b3d03245..0000000000000000000000000000000000000000
--- a/t/redo-sh.tests/clean.do
+++ /dev/null
@@ -1,4 +0,0 @@
-for f in * ; do
-    [ -d $f ] || continue
-    find $f ! -name test -delete
-done