bug 409643: allow normal bonsai URLs to get file lists from instead of making the admin find the cvs backout URL.

r=bear
This commit is contained in:
justdave%bugzilla.org 2007-12-24 03:14:26 +00:00
Родитель 6703b4822e
Коммит 95ccac4ee0
1 изменённых файлов: 7 добавлений и 0 удалений

Просмотреть файл

@ -66,6 +66,10 @@ sub parse_bonsai_backout_file {
if (($::ARGV[0]) && ($::ARGV[0] =~ /^http/)) { if (($::ARGV[0]) && ($::ARGV[0] =~ /^http/)) {
print "--\n"; print "--\n";
my $url = $::ARGV[0];
if ($url !~ m/generateBackoutCVSCommands/) {
$url .= '&generateBackoutCVSCommands=1';
}
my $data = `wget -O- -nv "$::ARGV[0]"`; my $data = `wget -O- -nv "$::ARGV[0]"`;
parse_bonsai_backout_file($data); parse_bonsai_backout_file($data);
} }
@ -92,6 +96,9 @@ EOF
chomp $filename; chomp $filename;
if ($filename =~ /^http/) { if ($filename =~ /^http/) {
print "--\n"; print "--\n";
if ($filename !~ m/generateBackoutCVSCommands/) {
$filename .= '&generateBackoutCVSCommands=1';
}
my $data = `wget -O- -nv "$filename"`; my $data = `wget -O- -nv "$filename"`;
parse_bonsai_backout_file($data); parse_bonsai_backout_file($data);
if (0 == @files) { if (0 == @files) {