From: HADES DAQ <hadaq@gsi.de>
Date: Mon, 23 Apr 2018 12:07:23 +0000 (+0200)
Subject: fix bug with downscaling in gnuplot 5
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=492162ed12c19e8f162aa8638b604494c58035eb;p=daqtools.git

fix bug with downscaling in gnuplot 5
---

diff --git a/tools/hadplot b/tools/hadplot
index efd3fbb..ca130e3 100755
--- a/tools/hadplot
+++ b/tools/hadplot
@@ -832,8 +832,8 @@ sub genhist {
   while(1) {
     my $a, my $s, my $t;
     my $val = 0 , my $time;
-    plot_storage_reset($storearr{0});
-    plot_write($plotstr);
+    plot_storage_reset($storearr{0}) if $storearr{0}->{"iteration"} % $storearr{0}->{"downscale"} == 0;
+    plot_write($plotstr) if $storearr{0}->{"iteration"} % $storearr{0}->{"downscale"} == 0;
     for(my $i = 0; $i<scalar(@{$address});$i++) {
       $val = 0;
       my $c = trb_registertime_read($address->[$i], $register->[$i]) or sleep 1 and print "Error\n" and next;