Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

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