aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorB. Watson <yalhcru@gmail.com>2018-06-25 18:12:40 -0400
committerB. Watson <yalhcru@gmail.com>2018-06-25 18:12:40 -0400
commitd53e1d76806405bb9df8d86f6e0478f4660e2ca2 (patch)
treea99e8dcbb17a84a634414dcc1b7640d8a895807b
parenteda14e4bd7fa47ad8a5df76a63b4939f8df65a5a (diff)
downloadsbostuff-d53e1d76806405bb9df8d86f6e0478f4660e2ca2.tar.gz
sbosrcarch: STATUS timestamps, add day-of-week
-rwxr-xr-xsbosrcarch7
1 files 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 <<EOF;
Status report for sbosrcarch archive