X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FCGI.pm;h=d9aceeb35eafd2dd627e503774b65caa60e0578b;hb=3210a2b7d904e95b48ebbd84afa2bf1875544e8e;hp=cac499fbc45658ddcf32663f9b20fc46592b2d01;hpb=08852aab550de858d4e4956ea357dbc3ae713a26;p=deb%2Fpackages.git

diff --git a/lib/Packages/CGI.pm b/lib/Packages/CGI.pm
index cac499f..d9aceeb 100644
--- a/lib/Packages/CGI.pm
+++ b/lib/Packages/CGI.pm
@@ -30,7 +30,7 @@ sub debug {
 sub msg {
     push @msgs, $_[0];
 }
-sub notes {
+sub note {
     push @notes, [ @_ ];
 }
 sub print_errors {
@@ -66,15 +66,14 @@ sub print_msgs {
 sub print_notes {
     foreach (@notes) {
 	my ( $title, $note ) = @$_;
-	my $str = "";
 
+	print '<div style="border: solid thin black; background-color: #ccf">';
 	if ($note) {
-	    $str .= "<h2 class=\"pred\">$title</h2>";
+	    print "<h2 class=\"pred\">$title</h2>";
 	} else {
 	    $note = $title;
 	}
-	$str .= "<p>$note</p>";
-	return $str;
+	print "<p>$note</p></div>";
     }
 }