Handle modules with v before version
authorJamie Cameron <jcameron@webmin.com>
Sun, 12 Aug 2007 05:26:13 +0000 (05:26 +0000)
committerJamie Cameron <jcameron@webmin.com>
Sun, 12 Aug 2007 05:26:13 +0000 (05:26 +0000)
cpan/download.cgi

index 5a4e015..523253c 100755 (executable)
@@ -189,7 +189,7 @@ if ($file{'Build.PL'} && $file{'Makefile.PL'} < @dirs) {
                }
        }
 foreach $d (@dirs) {
-       if ($d =~ /^(\S+)\-([0-9\.]+)$/) {
+       if ($d =~ /^(\S+)\-v?([0-9\.]+)$/) {
                push(@mods, $1);
                push(@vers, $2);
                }