--- deliantra/Deliantra-Client/DC/Pod.pm 2008/03/30 10:18:16 1.21
+++ deliantra/Deliantra-Client/DC/Pod.pm 2008/03/30 11:31:09 1.22
@@ -125,7 +125,20 @@
}
}
+my %as_common = (
+ h1 => sub {
+ "\n\n$_[1]\n"
+ },
+ h2 => sub {
+ "\n\n$_[1]\n"
+ },
+ h3 => sub {
+ "\n\n$_[1]\n"
+ },
+);
+
my %as_label = (
+ %as_common,
image => sub {
my ($par, $path) = @_;
@@ -153,6 +166,7 @@
}
my %as_paragraphs = (
+ %as_common,
image => sub {
my ($par, $path, $flags) = @_;