From e218afac2799bbebae5445049a354937d47447e5 Mon Sep 17 00:00:00 2001
From: Hadaq in Frankfurt <hadaq@frankfurt>
Date: Fri, 22 Mar 2013 11:29:08 +0100
Subject: [PATCH] Fixed bug in 'set standard settings' after moving code out
 (global variables not in scope). bn.

---
 soft/toolbox/jtag_atomic/the_gui.pl       | 2 +-
 soft/toolbox/jtag_atomic/ui_generators.pl | 3 +++
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/soft/toolbox/jtag_atomic/the_gui.pl b/soft/toolbox/jtag_atomic/the_gui.pl
index 1026a58..de329df 100755
--- a/soft/toolbox/jtag_atomic/the_gui.pl
+++ b/soft/toolbox/jtag_atomic/the_gui.pl
@@ -259,7 +259,7 @@ sub h_reload_boardsini {
 
 			       );
     $boards_handlers{$board} = \%board_handlers;
-    $board_handlers{'h_set_standard'}  = generate_h_set_standard(\%boards_handlers, \%chains_handlers);
+    $board_handlers{'h_set_standard'}  = generate_h_set_standard(\%boards_handlers, \%chains_handlers, \%chain_defaults, \%board_defaults, \%chain_defaults2);
     $boards_handlers{$board} = \%board_handlers;
     $gladexml3->signal_autoconnect_all(%board_handlers);
     my $vbox_board = $gladexml3->get_widget('vbox_top');
diff --git a/soft/toolbox/jtag_atomic/ui_generators.pl b/soft/toolbox/jtag_atomic/ui_generators.pl
index 026e7c1..4605fe1 100644
--- a/soft/toolbox/jtag_atomic/ui_generators.pl
+++ b/soft/toolbox/jtag_atomic/ui_generators.pl
@@ -344,6 +344,9 @@ sub generate_h_start_trbnetd {
 sub generate_h_set_standard {
   my %boards_handlers = %{$_[0]};
   my %chains_handlers = %{$_[1]};
+  my %chain_defaults  = %{$_[2]};
+  my %board_defaults  = %{$_[3]};
+  my %chain_defaults2  = %{$_[4]};
   return sub {
     foreach my $board (reverse sort keys %chains_handlers) {
       my %chains_handlers2 = %{$chains_handlers{$board}};
-- 
2.43.0