log a 1120 chars long string to aid in quoted-printable and soft

line break detection in daily build logs.
This commit is contained in:
Yang Tse 2007-02-27 23:46:48 +00:00
parent 060f7ca2d2
commit e817eb6cec

View File

@ -265,11 +265,14 @@ if ($fixed < 4) {
close(F); close(F);
} }
my $str1066os = 'o' x 1066;
# Set timestamp to the UTC this script is running. Its value might # Set timestamp to the UTC this script is running. Its value might
# be changed later in the script to the value present in curlver.h # be changed later in the script to the value present in curlver.h
$timestamp = scalar(gmtime)." UTC"; $timestamp = scalar(gmtime)." UTC";
logit "STARTING HERE"; # first line logged, for scripts to trigger on logit "STARTING HERE"; # first line logged, for scripts to trigger on
logit 'TRANSFER CONTROL ==== 1120 CHAR LINE' . $str1066os . 'LINE_END';
logit "NAME = $name"; logit "NAME = $name";
logit "EMAIL = $email"; logit "EMAIL = $email";
logit "DESC = $desc"; logit "DESC = $desc";
@ -282,6 +285,8 @@ logit "target = ".$targetos;
logit "version = $version"; # script version logit "version = $version"; # script version
logit "date = $timestamp"; # When the test build starts logit "date = $timestamp"; # When the test build starts
$str1066os = undef;
# Make $pwd to become the path without newline. We'll use that in order to cut # Make $pwd to become the path without newline. We'll use that in order to cut
# off that path from all possible logs and error messages etc. # off that path from all possible logs and error messages etc.
$pwd = cwd(); $pwd = cwd();