clean up descriptions

diff --git a/xml_spielwiese/cgitest.pl b/xml_spielwiese/cgitest.pl
index ca40b8b07012e7bc0434dbf5f0bf2ddfe8f7ff9d..090a3a80779dffadcc02411360efe3bcd8f034e5 100755 (executable)
--- a/xml_spielwiese/cgitest.pl
+++ b/xml_spielwiese/cgitest.pl
@@ -104,7 +104,7 @@ if (defined $cgiHash{'action'} ) {
 
 sub prepare_text {
   my $t = $_[0];
-  $t = chomp $t;
+  chomp $t;
   $t = encode_entities($t);
   $t =~ s/^\s//;
   $t =~ s/^\n//;