aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xsbosrcarch8
1 files changed, 2 insertions, 6 deletions
diff --git a/sbosrcarch b/sbosrcarch
index aaab775..43ccd00 100755
--- a/sbosrcarch
+++ b/sbosrcarch
@@ -1706,16 +1706,12 @@ sub write_status_file {
my $content = shift;
init_git();
- #open my $fh, "git log --date=format:%Y%m%d --pretty=format:'%h %ci: %an, %s' -n1|" or die "$!";
- open my $fh, "TZ=UTC git log --date=format-local:'%Y-%m-%d %H:%M:%S %Z' --pretty=format:'%h %cd: %an, %s' -n1" or die "$!";
- my $logline = <$fh>;
- close $fh;
+ chomp(my $logline = `TZ=UTC git log --date=format-local:'%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($fh, '>', "STATUS") or return;
+ open(my $fh, '>', "STATUS") or return;
- #chomp(my $timestamp = `date '+%Y-%m-%d %H:%M:%S %z'`);
chomp(my $timestamp = `TZ=UTC date '+%Y-%m-%d %H:%M:%S %Z'`);
print $fh <<EOF;