Moving old tlperl prior to committing new one

git-svn-id: svn://tug.org/texlive/trunk@21422 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 0 insertions, 9 deletions

diff --git a/Master/tlpkg/tlperl/lib/tainted.pl b/Master/tlpkg/tlperl/lib/tainted.pl
deleted file mode 100755
index 6e24867a83d..00000000000
--- a/Master/tlpkg/tlperl/lib/tainted.pl
+++ /dev/null
@@ -1,9 +0,0 @@
-# This subroutine returns true if its argument is tainted, false otherwise.
-
-sub tainted {
-    local($@);
-    eval { kill 0 * $_[0] };
-    $@ =~ /^Insecure/;
-}
-
-1;