aboutsummaryrefslogtreecommitdiffstats
path: root/meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest
diff options
context:
space:
mode:
Diffstat (limited to 'meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest')
-rw-r--r--meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest18
1 files changed, 16 insertions, 2 deletions
diff --git a/meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest b/meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest
index f1c833e6ca..5bc8b625bd 100644
--- a/meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest
+++ b/meta-perl/recipes-perl/libauthen/libauthen-radius-perl/run-ptest
@@ -13,8 +13,22 @@ systemctl restart radiusd || /etc/init.d/radiusd restart || {
exit 1
}
-# run teests
-perl test.pl
+# run tests
+# FIXME: this is from ptest-perl.bbclass and might not be correct
+for case in `find t -type f -name '*.t'`; do
+ perl $case >$case.output 2>&1
+ ret=$?
+ cat $case.output
+ if [ $ret -ne 0 ]; then
+ echo "FAIL: ${case%.t}"
+ elif grep -i 'SKIP' $case.output; then
+ echo "SKIP: ${case%.t}"
+ else
+ echo "PASS: ${case%.t}"
+ fi
+
+ rm -f $case.output
+done
# restore the config and restart
mv ${CONF_USERS}_orig ${CONF_USERS}