Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
4349 Serge 1
# no horiz rules between sections
2
$end_section = \&FFmpeg_end_section;
3
sub FFmpeg_end_section($$)
4
{
5
}
6
 
7
$EXTRA_HEAD =
8
'
9
';
10
 
11
$CSS_LINES = $ENV{"FFMPEG_CSS"} || <
12
13
EOT
14
 
15
my $TEMPLATE_HEADER = $ENV{"FFMPEG_HEADER"} || <
16
17
18
19
20
21
EOT
22
 
23
$PRE_BODY_CLOSE = '';
24
 
25
$SMALL_RULE = '';
26
$BODYTEXT = '';
27
 
28
$print_page_foot = \&FFmpeg_print_page_foot;
29
sub FFmpeg_print_page_foot($$)
30
{
31
    my $fh = shift;
32
    my $program_string = defined &T2H_DEFAULT_program_string ?
33
        T2H_DEFAULT_program_string() : program_string();
34
    print $fh '
' . "\n";
35
    print $fh '' . $program_string;
36
    print $fh "\n";
37
}
38
 
39
$float = \&FFmpeg_float;
40
 
41
sub FFmpeg_float($$$$)
42
{
43
    my $text = shift;
44
    my $float = shift;
45
    my $caption = shift;
46
    my $shortcaption = shift;
47
 
48
    my $label = '';
49
    if (exists($float->{'id'}))
50
    {
51
        $label = &$anchor($float->{'id'});
52
    }
53
    my $class = '';
54
    my $subject = '';
55
 
56
    if ($caption =~ /NOTE/)
57
    {
58
        $class = "alert alert-info";
59
    }
60
    elsif ($caption =~ /IMPORTANT/)
61
    {
62
        $class = "alert alert-warning";
63
    }
64
 
65
    return '
' . "$label\n" . $text . '
';
66
}
67
 
68
$print_page_head = \&FFmpeg_print_page_head;
69
sub FFmpeg_print_page_head($$)
70
{
71
    my $fh = shift;
72
    my $longtitle = "$Texi2HTML::THISDOC{'fulltitle_no_texi'}";
73
    $longtitle .= ": $Texi2HTML::NO_TEXI{'This'}" if exists $Texi2HTML::NO_TEXI{'This'};
74
    my $description = $DOCUMENT_DESCRIPTION;
75
    $description = $longtitle if (!defined($description));
76
    $description = "" if
77
         ($description ne '');
78
    $description = $Texi2HTML::THISDOC{'documentdescription'} if (defined($Texi2HTML::THISDOC{'documentdescription'}));
79
    my $encoding = '';
80
    $encoding = "" if (defined($ENCODING) and ($ENCODING ne ''));
81
    $longtitle =~ s/Documentation.*//g;
82
    $longtitle = "FFmpeg documentation : " . $longtitle;
83
 
84
    print $fh <
85
86
87
$Texi2HTML::THISDOC{'copying'}
88
91
92
$longtitle
93
 
94
$description
95
96
97
$encoding
98
$CSS_LINES
99
$TEMPLATE_HEADER
100
EOT
101
}
102
 
103
# declare encoding in header
104
$IN_ENCODING = $ENCODING = "utf-8";
105
 
106
# no navigation elements
107
$SECTION_NAVIGATION = 0;
108
# the same for texi2html 5.0
109
$HEADERS = 0;
110
 
111
# TOC and Chapter headings link
112
$TOC_LINKS = 1;
113
 
114
# print the TOC where @contents is used
115
$INLINE_CONTENTS = 1;