diff options
Diffstat (limited to 'Tools/scripts/release/scrubindex.pl')
-rwxr-xr-x | Tools/scripts/release/scrubindex.pl | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/Tools/scripts/release/scrubindex.pl b/Tools/scripts/release/scrubindex.pl deleted file mode 100755 index 608d4d359a24..000000000000 --- a/Tools/scripts/release/scrubindex.pl +++ /dev/null @@ -1,31 +0,0 @@ -#!/usr/bin/perl -# $FreeBSD$ - -die "$0 <pkgdir> <indexfile>\n" if ($#ARGV != 1); - -$xdep = 'XFree86-3\.3\.6_10'; -$pkgdir = shift(@ARGV); -#$ext = 'tbz'; -$ext = 'tgz'; - -print STDERR "scrubindex pkgdir: $pkgdir\n"; - -my $cnt = 0; - -LOOP: -while (<>) { - s/$xdep//g; - s/ */ /g; - s/\| /\|/g; - - @f = split('\|'); - next if (! -f "$pkgdir/$f[0].$ext"); - - foreach $dep (split(' ', $f[8])) { - next LOOP if (! -f "$pkgdir/$dep.$ext"); - } - - $cnt++; - print; -} -print STDERR "$cnt lines copied from scrubindex.pl" |