|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /usr/libexec/webmin/mailcap/ |
Upload File : |
#!/usr/bin/perl
# Show current mailcap entries
require './mailcap-lib.pl';
&ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1);
@mailcap = &list_mailcap();
if (@mailcap) {
print &ui_form_start("delete.cgi", "post");
print &select_all_link("d"),"\n";
print &select_invert_link("d"),"\n";
print "<a href='edit.cgi?new=1'>$text{'index_add'}</a><br>\n";
@tds = ( "width=5" );
print &ui_columns_start([
"",
$text{'index_type'},
$text{'index_program'},
$text{'index_cmt'},
$text{'index_enabled'},
], "width=100%", 0, \@tds);
foreach $m (@mailcap) {
print &ui_checked_columns_row([
"<a href='edit.cgi?index=$m->{'index'}'>$m->{'type'}</a>",
$m->{'program'},
$m->{'cmt'} || $m->{'args'}->{'description'},
$m->{'enabled'} ? $text{'yes'} :
"<font color=#ff0000>$text{'no'}</font>",
], \@tds, "d", $m->{'index'});
}
print &ui_columns_end();
print &select_all_link("d"),"\n";
print &select_invert_link("d"),"\n";
print "<a href='edit.cgi?new=1'>$text{'index_add'}</a><br>\n";
print &ui_form_end([ [ "delete", $text{'index_delete'} ],
undef,
[ "disable", $text{'index_disable'} ],
[ "enable", $text{'index_enable'} ] ]);
}
else {
print "<b>$text{'index_none'}</b><p>\n";
print "<a href='edit.cgi?new=1'>$text{'index_add'}</a><p>\n";
}
&ui_print_footer("/", $text{'index'});