diff options
author | B. Watson <yalhcru@gmail.com> | 2018-07-28 04:09:15 -0400 |
---|---|---|
committer | B. Watson <yalhcru@gmail.com> | 2018-07-28 04:09:15 -0400 |
commit | 0348a3112ca460e3afdd5babf9251033f114b12f (patch) | |
tree | ddc691f3d1f3b56efafa05f167861fe8daf6d4cb /sbosrcarch | |
parent | 89d77b90b53bbd60e4deac4cc73ad85e915a08b4 (diff) | |
download | sbostuff-0348a3112ca460e3afdd5babf9251033f114b12f.tar.gz |
sbosrcarch: remove STATUS.old
Diffstat (limited to 'sbosrcarch')
-rwxr-xr-x | sbosrcarch | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -1734,8 +1734,7 @@ sub check_info_wanted { } # write status results to STATUS file in the root of the archive -# dir. if there's an old STATUS, it gets renamed to STATUS.old. -# errors will be silently ignored (e.g. permission denied). +# dir. errors will be silently ignored (e.g. permission denied). sub write_status_file { my $content = shift; @@ -1746,7 +1745,6 @@ sub write_status_file { chomp(my $logline = `TZ=UTC git log --date=format-local:'%a %Y-%m-%d %H:%M:%S %Z' --pretty=format:'%h %cd: %an, %s' -n1`); chdir($archivedir) or die "$archivedir: $!"; - rename("STATUS", "STATUS.old"); # ignore errors open(my $fh, '>', "STATUS") or return; chomp(my $timestamp = `TZ=UTC date '+%a %Y-%m-%d %H:%M:%S %Z'`); |