Import version as of 2019-04-03 for upload-ftp-v1.2.pl

diff --git a/upload-ftp-v1.2.pl b/upload-ftp-v1.2.pl
index 7d97cad9511f1cda3ca77b4c8d811f14217da6bb..a0c4f0524877b0983e969860e332f4b774d92fa3 100755 (executable)
--- a/upload-ftp-v1.2.pl
+++ b/upload-ftp-v1.2.pl
@@ -88,6 +88,7 @@
 # Additional functionality (v1.1) by Ward Vandewege (ward@gnu.org), May 2004
 # Additional changes (syslog) by Justin Baugh (baughj@gnu.org), August 2005
 # Additional testing, bugfixes and functionality by Ward Vandewege (ward@gnu.org), Apr 2006 - Jan 2013
+# Additional changes (update ftpindex) by Ruben Rodriguez (ruben@gnu.org), September 2017
 
 use strict;
 use Net::SMTP;
@@ -110,9 +111,9 @@ my $V1_COMPAT_ALLOWED = 0;
 
 my $NAME = 'upload-ftp-v1.2.pl';
 my $VERSION = '1.2'; # This is the protocol version
-my $DATE = '2013/01/23 20:26:29';
+my $DATE = '2017/09/14 12:42:38';
 my $AUTHORS = "Free Software Foundation <sysadmin\@gnu.org>";
-my $COPYRIGHT = "2003-2013";
+my $COPYRIGHT = "2003-2017";
 my $LICENSE = "GPLv3 or later - http://www.fsf.org/licenses/gpl.txt";
 my $URL = "http://www.gnu.org/prep/maintain/html_node/Automated-FTP-Uploads.html";
 
@@ -233,6 +234,8 @@ sub main
     ftp_syslog('info', "($log_style) No files found for processing.");
   } else {
     ftp_syslog('info', "($log_style) Processing complete: " . (scalar @incoming) . " uploads processed.");
+    system("/etc/cron.daily/generate-ftpindex");
+    ftp_syslog('info', "($log_style) Updated ftpindex");
   }
 
   # Clean up the incoming directory and the incoming tmp directory - remove files older than a day