From: Hadaq Hades <jan@lxhadeb07>
Date: Tue, 5 Mar 2019 13:38:40 +0000 (+0100)
Subject: log all actions in gui. mt
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=361efdf53c8379c8e74b3667b17ff24fb594fc63;p=hadesdaq.git

log all actions in gui. mt
---

diff --git a/control/gui/Buttons2.pm b/control/gui/Buttons2.pm
index 187a52f..c6c839a 100644
--- a/control/gui/Buttons2.pm
+++ b/control/gui/Buttons2.pm
@@ -373,7 +373,7 @@ sub make_subroutine {
     # make subroutines
     #sub slot0Pressed { my $c = buttons->[0]; $c = "cd ../control; ./$c"; print "will execute: $c\n"; qx($c); }
 
-    my $str = qq|sub slot| . $i . qq|Pressed { my \$c = this->{self}->{ra_buttons}->[$i]; \$c = "cd $dir; ./\$c &"; print "will execute: \$c\n"; system(\$c); }|;
+    my $str = qq|sub slot| . $i . qq|Pressed { my \$c = this->{self}->{ra_buttons}->[$i]; \$c = "cd $dir; control_gui_logger.sh \$c; ./\$c &"; print "will execute: \$c\n"; system(\$c); }|;
 #    my $str = qq|sub slot| . $i . qq|Pressed { print "$i pressed\n"; }|;
 #system(\$c); }|;
     #print "sub: $str\n";