From 2129989dfeadc22b67d530b1b54270dfa15bc090 Mon Sep 17 00:00:00 2001 From: Jan Michel Date: Mon, 24 Jun 2013 15:18:59 +0200 Subject: [PATCH] further changes to css --- xml_spielwiese/cgitest.pl | 12 ++++++------ xml_spielwiese/styles.css | 15 ++++++++++++++- 2 files changed, 20 insertions(+), 7 deletions(-) diff --git a/xml_spielwiese/cgitest.pl b/xml_spielwiese/cgitest.pl index 631a53d..eb57312 100755 --- a/xml_spielwiese/cgitest.pl +++ b/xml_spielwiese/cgitest.pl @@ -216,7 +216,7 @@ sub print_registers { my $xmlfile = $_[0]; my $xmltree = $parser->parse_file($xmlfile); my @registers = sort by_name $xmltree->findnodes("/MAPS/register"); -print ""; +print "
"; for my $register (@registers ){ my $registerName = $register->findvalue("./\@name"); @@ -247,7 +247,7 @@ EOF print ""; #print ""; - print ''; + print ''; print ''; print '
'; print_fields($xmlfile,$register); @@ -264,7 +264,7 @@ sub print_fields { my $xmlfile = $_[0]; my $registerName = $register->findvalue("./\@name"); my @fields = sort by_name $register->findnodes("./field"); - print ""; + print "
"; for my $field (@fields){ my $fieldName = $field->findvalue("./\@name"); my $readOnlyFlag = 0; @@ -280,7 +280,7 @@ sub print_fields { print ""; if ($readOnlyFlag){ print <$fieldValue + EOF } else { print <'; if($xmlfile eq $specfile){ print < >>  + EOF } if($xmlfile eq $setfile){ print < X  + EOF } print ""; diff --git a/xml_spielwiese/styles.css b/xml_spielwiese/styles.css index 636cf33..2561ba9 100644 --- a/xml_spielwiese/styles.css +++ b/xml_spielwiese/styles.css @@ -45,7 +45,7 @@ input[type="button"] .button_move { background:orange; - cursor:hand; + cursor:pointer; } .regheader { @@ -55,4 +55,17 @@ input[type="button"] .bitfield { background:#dea; + visibility:collapse; +} + + +table.fields { + background:#dea; + border-collapse:collapse; + border:none; +} + +table.registers { + border-collapse:collapse; + border:1px solid white; } \ No newline at end of file -- 2.43.0
 = $fieldValue >>  X