1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/install/share/meta-task/check-rpmsrate b/perl-install/install/share/meta-task/check-rpmsrate
new file mode 100755
index 000000000..fb2fe6e99
--- /dev/null
+++ b/perl-install/install/share/meta-task/check-rpmsrate
@@ -0,0 +1,5 @@
+#!/usr/bin/perl
+use lib qw(/usr/lib/libDrakX);
+use pkgs;
+my $f = $ARGV[0] or die "usage: $0 <rpmsrate file>";
+pkgs::read_rpmsrate_raw($f);