clone|fetch: preserve mtime of modified manifest.js.gz

[public-inbox.git] / lib / PublicInbox / Fetch.pm

diff --git a/lib/PublicInbox/Fetch.pm b/lib/PublicInbox/Fetch.pm
index 5261cad198552883ce162ea0fa3b84e908939da1..364271e8ccd918537db42ae01e3d0d6734ed84fa 100644 (file)
--- a/lib/PublicInbox/Fetch.pm
+++ b/lib/PublicInbox/Fetch.pm
@@ -221,7 +221,9 @@ EOM
                if ($mculled) {
                        my $json = PublicInbox::Config->json->encode($m1);
                        my $fn = $ft->filename;
+                       my $mtime = (stat($fn))[9];
                        gzip(\$json => $fn) or die "gzip: $GzipError";
+                       utime($mtime, $mtime, $fn) or die "utime(..., $fn): $!";
                }
                PublicInbox::LeiMirror::ft_rename($ft, $mf, 0666);
        }