From 30b1bde4859e495299a839050cee9499a0bcb973 Mon Sep 17 00:00:00 2001
From: Troy Will <troy@www.troywill.info>
Date: Fri, 10 Jul 2009 08:37:31 +0400
Subject: [PATCH] minor update

---
 experimental/gnu-install |  12 ++++++++----
 experimental/gnu.db      | Bin 8192 -> 8192 bytes
 2 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/experimental/gnu-install b/experimental/gnu-install
index 9df6549..5f60065 100755
--- a/experimental/gnu-install
+++ b/experimental/gnu-install
@@ -46,16 +46,20 @@ sub stow_gnu_software {
     my $sth2 = $dbh->prepare('SELECT directory, latest_tarball FROM latest_tarball WHERE gnu_software_id = ?');
     $sth2->execute($software_id);
     my ( $directory, $tarball ) = $sth2->fetchrow_array;
+    &download_tarball( $directory, $tarball, $url );
     sub download_tarball {
-      my ( $directory, $tarball ) = @_;
+      my ( $directory, $tarball, $url ) = @_;
+      my $download_command = '';
       if ( $tarball ne 'OVERRIDE' ) {
-	my $download_command = "wget --no-clobber ${url}${directory}/$tarball";
+	$download_command = "wget --no-clobber ${url}${directory}/$tarball";
       } 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 ("$tar_command $tarball");
     }
-    system ("$tar_command $tarball");
+
     chdir ("$software-$version");
     open(OUT, ">stow-$software-$version");
     print OUT "#!/bin/bash\n";
diff --git a/experimental/gnu.db b/experimental/gnu.db
index 218b6e3801305ebf7f7afc153568fd807616c5a6..cef4d8021bef6c3d92b12af2a49700bd0daaa409 100644
GIT binary patch
delta 77
zcmZp0XmFSy&8V?a=7qEvCsPXp^9|<p%uURJ%vwzUm@Y6aW@_22$dbh*FU!fsz$hxK
h$eCM^R^%V%8WiN|;%a1IV5w_hu4`bqd9hq9BLFM+6e0is

delta 43
zcmZp0XmFSy&8WUn=7qEf2h(B(<{QlGnVXmcnYEbyF<oF<yjhW@n`!f6xmZR39)k@g