+
+
+EOT
my $LIBAV_NAVBAR = $ENV{"LIBAV_NAVBAR"} || '';
@@ -31,6 +88,35 @@ sub Libav_print_page_foot($$)
print $fh "\n";
}
+$float = \&Libav_float;
+
+sub Libav_float($$$$)
+{
+ my $text = shift;
+ my $float = shift;
+ my $caption = shift;
+ my $shortcaption = shift;
+
+ my $label = '';
+ if (exists($float->{'id'}))
+ {
+ $label = &$anchor($float->{'id'});
+ }
+ my $class = '';
+ my $subject = '';
+
+ if ($caption =~ /NOTE/)
+ {
+ $class = "note";
+ }
+ elsif ($caption =~ /IMPORTANT/)
+ {
+ $class = "important";
+ }
+
+ return '' . "$label\n" . $text . '
';
+}
+
$print_page_head = \&Libav_print_page_head;
sub Libav_print_page_head($$)
{