mirror of
https://github.com/webmin/webmin.git
synced 2025-07-25 01:23:45 +00:00
32 lines
935 B
Perl
Executable File
32 lines
935 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# Show a page of icons for various PHP config sections
|
|
|
|
require './phpini-lib.pl';
|
|
&ReadParse();
|
|
&can_php_config($in{'file'}) || &error($text{'list_ecannot'});
|
|
|
|
# Work out if we can just see one file
|
|
@files = &list_php_configs();
|
|
if (@files == 1 && !$access{'anyfile'} && $access{'noconfig'}) {
|
|
$onefile = 1;
|
|
}
|
|
|
|
$fmt = $text{'list_format_'.&get_config_fmt($in{'file'})};
|
|
&ui_print_header("<tt>".&html_escape($in{'file'})."</tt> ($fmt)",
|
|
$text{'list_title'}, "", undef, 0, $onefile);
|
|
|
|
@pages = ( "vars", "dirs", "db", "session", "safe", "limits",
|
|
"errors", "misc", "manual" );
|
|
@links = map { "edit_${_}.cgi?file=".&urlize($in{'file'})."&oneini=1" } @pages;
|
|
@titles = map { $text{$_."_title"} } @pages;
|
|
@icons = map { "images/$_.gif" } @pages;
|
|
&icons_table(\@links, \@titles, \@icons, 4);
|
|
|
|
if ($onefile) {
|
|
&ui_print_footer("/", $text{'index'});
|
|
}
|
|
else {
|
|
&ui_print_footer("", $text{'index_return'});
|
|
}
|
|
|