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

Amend 341410a5: Change log-output to better parse urls

Browse Source
This commit is contained in:
Kornel Benko 2024-10-08 11:36:25 +02:00
parent 46edbaca77
commit 4063951ded
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
development/checkurls/search_url.pl
View File

@ -228,6 +228,10 @@ for (my $i = 0; $i < $NR_JOBS; $i++) { # Number of subprocesses
if ($res || $checkSelectedOnly) { if ($res || $checkSelectedOnly) {
printx("$err_txt \"$u\"\n", $outSum, $fe, $fs); printx("$err_txt \"$u\"\n", $outSum, $fe, $fs);
} }
else {
printx("OK url: \"$u\"\n", $outSum, $fe, $fs);
$printSourceFiles = 1;
}
if ($printSourceFiles) { if ($printSourceFiles) {
if (defined($URLS{$u})) { if (defined($URLS{$u})) {
for my $f (sort keys %{$URLS{$u}}) { for my $f (sort keys %{$URLS{$u}}) {
@ -245,7 +249,7 @@ for (my $i = 0; $i < $NR_JOBS; $i++) { # Number of subprocesses
$wait[$i] = $pid; $wait[$i] = $pid;
} }
for (my $i = 0; $i < 10; $i++) { for (my $i = 0; $i < $NR_JOBS; $i++) {
my $p = $wait[$i]; my $p = $wait[$i];
if ($p > 0) { if ($p > 0) {
waitpid($p, 0); waitpid($p, 0);