From: Michael Wiebusch Date: Wed, 31 Jul 2013 13:11:20 +0000 (+0200) Subject: test X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=99ab1438120e7c1ae69159b481cbe008f883f57d;p=mvdsensorcontrol.git test --- diff --git a/tools/testgui.pl b/tools/testgui.pl index e03894f..7205fe4 100755 --- a/tools/testgui.pl +++ b/tools/testgui.pl @@ -51,7 +51,7 @@ unless($q->param()) { -title=>'testgui_debug', -style=>{'src'=>'../layout/styles.css'}, -script=>{ -type => 'text/javascript', - -src => './testgui.js'}, + -src => './testgui.js'} ); #process the arguments report_param(); @@ -95,8 +95,10 @@ print header; print start_html( -title=>'testgui', -style=>[{'src'=>'../layout/styles.css'}, -{'src'=>'../layout/jtageditor.css'} -] +{'src'=>'../layout/testgui.css'} +], +-script=>{ -type => 'text/javascript', +-src => './testgui.js'} ); print h2("testgui"); @@ -217,13 +219,20 @@ sub print_sensorArea { print "
"; print ""; print ""; - print ""; + print ""; print ""; print ""; - print ""; print ""; + print ""; + print ""; + print ""; print "
$sensorName$sensorName
blah"; + my $previewFieldId = "preview".$sensorName; + print "blah"; print_quickEditArea($sensorConfig); print "
"; + my $command = "./preview/prevImg.pl"; + print q%%; + print "
"; print "";