From ddef2065aab03dc1e638d8489fe697b026875965 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 6 Sep 2012 10:55:38 +0000 Subject: make it parse latest URPM --- fake_packages/gen.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'fake_packages') diff --git a/fake_packages/gen.pl b/fake_packages/gen.pl index e5c367b..1e7786b 100755 --- a/fake_packages/gen.pl +++ b/fake_packages/gen.pl @@ -79,7 +79,7 @@ sub parse_xs { } elsif (/^\s*ALIAS:\s*$/) { $state = 'alias'; } elsif ($state eq 'alias') { - if (my ($f) = /^\s*(\S+)\s*=\s*\d+\s*$/) { + if (my ($f) = /^\s*(\S+)\s*=\s*\w+\s*$/) { my $pkg = $f =~ s/(.*)::// ? $1 : $current_package; $l{$pkg}{$f} ||= $l{$current_package}{$current_name}; } else { -- cgit v1.2.1