From ec9f0e8e6082f460358eb8cfae073e02b3fee19b Mon Sep 17 00:00:00 2001 From: Jan Michel Date: Mon, 24 Jun 2013 16:59:39 +0200 Subject: [PATCH] clean up descriptions --- xml_spielwiese/cgitest.pl | 14 ++++++++++++-- xml_spielwiese/styles.css | 7 +++++++ 2 files changed, 19 insertions(+), 2 deletions(-) diff --git a/xml_spielwiese/cgitest.pl b/xml_spielwiese/cgitest.pl index c5e3cc7..ca40b8b 100755 --- a/xml_spielwiese/cgitest.pl +++ b/xml_spielwiese/cgitest.pl @@ -102,6 +102,16 @@ if (defined $cgiHash{'action'} ) { #################### SUBLAND ###################### +sub prepare_text { + my $t = $_[0]; + $t = chomp $t; + $t = encode_entities($t); + $t =~ s/^\s//; + $t =~ s/^\n//; + $t =~ s/\t//; + return $t; + } + sub del { @@ -225,7 +235,7 @@ for my $register (@registers ){ my $registerName = $register->findvalue("./\@name"); my $registerId = $register->findvalue("./\@id"); my $registerSize = $register->findvalue("./\@size"); - my $registerDescr = encode_entities($register->findvalue("./description") || "n/a"); + my $registerDescr = prepare_text($register->findvalue("./description") || "n/a"); my $flistid = $xmlfile."//".$registerName; @@ -272,7 +282,7 @@ sub print_fields { my $fieldName = $field->findvalue("./\@name"); my $readOnlyFlag = 0; my $fieldValue = $field->findvalue("./\@value"); - my $fieldDescr = encode_entities($field->findvalue("./description") || "n/a"); + my $fieldDescr = prepare_text($field->findvalue("./description") || "n/a"); my $fieldId = $xmlfile."//".$registerName."/".$fieldName; if ($fieldValue eq "") { $fieldValue = $field->findvalue("./\@defaultValue"); diff --git a/xml_spielwiese/styles.css b/xml_spielwiese/styles.css index 5e7f251..4c9fc8f 100644 --- a/xml_spielwiese/styles.css +++ b/xml_spielwiese/styles.css @@ -134,3 +134,10 @@ table.fields td.button_move:hover, table.registers td.button_move:hover { background:#fb4; } +div.header { + font-size:14pt; + position:absolute; + top:-20px; + color:#666; +} + -- 2.43.0