+sub create_listitem_markup($) {
+ my $entry = shift;
+ my $description = $entry->{description};
+
+ chomp $description;
+
+ $description =~ s@\n@\n @g;
+ return " <listitem>\n" .
+ " <para>\n" .
+ " " . $description . "\n" .
+ " </para>\n" .
+ " </listitem>\n";
+}
+
+sub wrap_in_para_itemlist_markup($) {
+ my $content = shift;
+ my $markup = "<para>\n" .
+ " <itemizedlist>\n" .
+ " $content" .
+ " </itemizedlist>\n" .
+ "</para>\n";
+ return $markup;
+}
+