From fe30a773e99e2ef4d560caa91e0dfc9ff72a3bdc Mon Sep 17 00:00:00 2001 From: Michael Andreen Date: Tue, 17 Jan 2023 13:41:17 +0100 Subject: [PATCH] Use all ships for milscan fleet amount --- lib/NDWeb/Scans.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/NDWeb/Scans.pm b/lib/NDWeb/Scans.pm index f266149..87a43d1 100644 --- a/lib/NDWeb/Scans.pm +++ b/lib/NDWeb/Scans.pm @@ -40,7 +40,7 @@ sub parseMilScan ($) { my $total = 0; while ($file =~ m{([^<]+)(.+?)}g) { my $ship = $1; - next if $ship eq 'Total Ships'; + next if $ship eq 'Total Visible Ships'; my $amounts = $2; my $tot_amount = 0; my $i = 0; @@ -48,7 +48,7 @@ sub parseMilScan ($) { my $fleet = $fleets[$i]; my $amount = $1; $amount =~ s/,//g; - if ($ship eq 'Total Visible Ships') { + if ($ship eq 'Total Ships') { $fleet->{amount} = $amount; } elsif ($amount > 0) { $tot_amount += $amount; -- 2.39.2