diff --git a/driveGnuPlots.pl b/driveGnuPlots.pl index 493c0c1..b7c9b47 100755 --- a/driveGnuPlots.pl +++ b/driveGnuPlots.pl @@ -208,7 +208,7 @@ sub mainThread { my $idx = $1; my $point = $2; - newCurve("", "", undef, $idx); + newCurve("", "", undef, $idx) unless exists $curves[$idx]; push @{$curves[$idx]}, [$xlast, $point]; }