Touch after uploading

transmission.pl

@@ -5,6 +5,7 @@ use strict;
 # Includes
 use JSON;
 use Date::Parse;
+use File::Touch;
 use File::Temp qw/ :mktemp /;
 use File::Basename;
 use FindBin qw($Bin);
@@ -583,6 +584,9 @@ sub processFile($$) {
 	runAndCheck(('cp', $file, $tmp));
 	rename($tmp, $dest);
 
+	# Touch to avoid carrying dates set in the download process
+	touch($dest);
+
 	# Return success
 	return 1;
 }