From b72fcff44da2f1dd6864ee82401e90c389f30bdc Mon Sep 17 00:00:00 2001 From: Dirk Zimoch Date: Wed, 5 Apr 2023 09:27:42 +0200 Subject: [PATCH] fix problem with commands returning multiple trailing newlines --- src/tools/genVersionHeader.pl | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/tools/genVersionHeader.pl b/src/tools/genVersionHeader.pl index c4a0bef20..99598cca1 100644 --- a/src/tools/genVersionHeader.pl +++ b/src/tools/genVersionHeader.pl @@ -20,6 +20,9 @@ use POSIX qw(strftime); use strict; +# Make sure that chomp removes all trailing newlines +$/=''; + # RFC 8601 date+time w/ zone (eg "2014-08-29T09:42-0700") my $tfmt = '%Y-%m-%dT%H:%M'; $tfmt .= '%z' unless $^O eq 'MSWin32'; # %z returns zone name on Windows