+ my $program_string = defined &T2H_DEFAULT_program_string ?
+ T2H_DEFAULT_program_string() : program_string();
+ print $fh '<footer class="footer pagination-right">' . "\n";
+ print $fh '<span class="label label-info">' . $program_string;
+ print $fh "</span></footer></div>\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 = "alert alert-info";
+ }
+ elsif ($caption =~ /IMPORTANT/)
+ {
+ $class = "alert alert-warning";
+ }
+
+ return '<div class="float ' . $class . '">' . "$label\n" . $text . '</div>';