From d53e1d76806405bb9df8d86f6e0478f4660e2ca2 Mon Sep 17 00:00:00 2001 From: "B. Watson" Date: Mon, 25 Jun 2018 18:12:40 -0400 Subject: sbosrcarch: STATUS timestamps, add day-of-week --- sbosrcarch | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/sbosrcarch b/sbosrcarch index 0f9746b..d8ef22e 100755 --- a/sbosrcarch +++ b/sbosrcarch @@ -1706,13 +1706,16 @@ sub write_status_file { my $content = shift; init_git(); - chomp(my $logline = `TZ=UTC git log --date=format-local:'%Y-%m-%d %H:%M:%S %Z' --pretty=format:'%h %cd: %an, %s' -n1`); + + # git is lovely, but all those options mean it takes a minute to + # find what you wanted in the man page... + 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 '+%Y-%m-%d %H:%M:%S %Z'`); + chomp(my $timestamp = `TZ=UTC date '+%a %Y-%m-%d %H:%M:%S %Z'`); print $fh <