minor update
This commit is contained in:
parent
622a137e41
commit
30b1bde485
2 changed files with 8 additions and 4 deletions
|
@ -46,16 +46,20 @@ sub stow_gnu_software {
|
||||||
my $sth2 = $dbh->prepare('SELECT directory, latest_tarball FROM latest_tarball WHERE gnu_software_id = ?');
|
my $sth2 = $dbh->prepare('SELECT directory, latest_tarball FROM latest_tarball WHERE gnu_software_id = ?');
|
||||||
$sth2->execute($software_id);
|
$sth2->execute($software_id);
|
||||||
my ( $directory, $tarball ) = $sth2->fetchrow_array;
|
my ( $directory, $tarball ) = $sth2->fetchrow_array;
|
||||||
|
&download_tarball( $directory, $tarball, $url );
|
||||||
sub download_tarball {
|
sub download_tarball {
|
||||||
my ( $directory, $tarball ) = @_;
|
my ( $directory, $tarball, $url ) = @_;
|
||||||
|
my $download_command = '';
|
||||||
if ( $tarball ne 'OVERRIDE' ) {
|
if ( $tarball ne 'OVERRIDE' ) {
|
||||||
my $download_command = "wget --no-clobber ${url}${directory}/$tarball";
|
$download_command = "wget --no-clobber ${url}${directory}/$tarball";
|
||||||
} else {
|
} else {
|
||||||
my $download_command = "wget --no-clobber http://www.mpfr.org/mpfr-current/mpfr-2.4.1.tar.bz2";
|
$download_command = "wget --no-clobber http://www.mpfr.org/mpfr-current/mpfr-2.4.1.tar.bz2";
|
||||||
}
|
}
|
||||||
|
print "==== $download_command ====\n";
|
||||||
system ("$download_command");
|
system ("$download_command");
|
||||||
}
|
|
||||||
system ("$tar_command $tarball");
|
system ("$tar_command $tarball");
|
||||||
|
}
|
||||||
|
|
||||||
chdir ("$software-$version");
|
chdir ("$software-$version");
|
||||||
open(OUT, ">stow-$software-$version");
|
open(OUT, ">stow-$software-$version");
|
||||||
print OUT "#!/bin/bash\n";
|
print OUT "#!/bin/bash\n";
|
||||||
|
|
Binary file not shown.
Loading…
Reference in a new issue