X-Git-Url: http://git.i-scream.org/?a=blobdiff_plain;f=cgi-bin%2Fdownload.cgi;h=6ac9978e14e91bff2e02a2414185f583d146a932;hb=da4773d86aae6b7e362ece46ecb141bab298e268;hp=d271ac23586e7d733768190c5bb4196b1fcff395;hpb=db82dfc2fa5376935a6781e1a977c01a5d86e5a7;p=www.i-scream.org.git

diff --git a/cgi-bin/download.cgi b/cgi-bin/download.cgi
index d271ac2..6ac9978 100755
--- a/cgi-bin/download.cgi
+++ b/cgi-bin/download.cgi
@@ -48,7 +48,7 @@ if (!defined($file_name) || $file_name eq "") {
 
 if (defined($submit) && $submit eq "Download") {
     open(LOGFILE, ">>$log_file");
-    print LOGFILE "$date|$file_name|$your_name|$email_address|$country\n";
+    print LOGFILE "$date|$ENV{'REMOTE_ADDR'}|$file_name|$your_name|$email_address|$country\n";
     close(LOGFILE);
     print $query->redirect("$build_dir/$file_name");
 }
@@ -108,7 +108,7 @@ END
         
         <p>&nbsp;</p>
         
-        <form action="download.cgi" method="POST">
+        <form action="/cgi-bin/download.cgi" method="POST">
          <table border="0" align="center">
           <tr>
            <td><font face="arial,sans-serif">Filename:</font></td>
@@ -154,5 +154,5 @@ exit;
 # Print a file without escaping HTML: -
 sub print_html ($) {
     my ($filename) = @_;
-    print `cat $filename`;
-}
\ No newline at end of file
+    print `cat $filename 2>&1`;
+}