anne/lyx_mirror
1
0
Fork 0
mirror of https://git.lyx.org/repos/lyx.git synced 2024-11-22 01:59:02 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Cmake tests urls: Changed log-output for easier parsing

Browse Source
This commit is contained in:
Kornel Benko 2024-10-15 10:48:26 +02:00
parent 7abdcb613d
commit fdd314e25e
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
development/checkurls/search_url.pl
View File

@ -280,7 +280,7 @@ do {
}
}
until ($p < 0);
print SFO "Started to protocol remaining subprocess-logs\n";
print "Started to protocol remaining subprocess-logs\n";
for my $p (keys %wait) {
if ($wait{$p} >= 0) {
@ -288,7 +288,7 @@ for my $p (keys %wait) {
$wait{$p} = -1;
}
}
print SFO "Stopped to protocol remaining subprocess-logs\n";
print "Stopped to protocol remaining subprocess-logs\n";
unlink($countfile);
if (%URLS) {
@ -297,7 +297,7 @@ if (%URLS) {
printNotUsedURLS("KnownInvalid", %extraURLS);
}
print "\n$errorcount URL-tests failed out of $URLScount\n\n";
print SFO "\n$errorcount URL-tests failed out of $URLScount\n\n";
if (defined($summaryFile)) {
close(SFO);
}
@ -332,7 +332,7 @@ sub printNotUsedURLS($\%) {
sub replaceSpecialChar($) {
my ($l) = @_;
$l =~ s/\\SpecialChar(NoPassThru)?\s*(TeX|LaTeX|LyX)[\s]?/\2/;
$l =~ s/\\SpecialChar(NoPassThru)?\s*(TeX|LaTeX|LyX)[\s]?/$2/;
return ($l);
}
@ -362,7 +362,7 @@ sub parse_file($) {
my ($f) = @_;
my $status = "out"; # outside of URL/href
return if ($f =~ /\/attic\//);
#return if ($f =~ /\/attic\//);
if (open(FI, $f)) {
my $line = 0;
while (my $l = <FI>) {