JFIF x x C
C "
} !1AQa"q2#BR$3br
%&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz
w !1AQaq"2B #3Rbr#!/usr/bin/perl
# standard_chooser.cgi
# Display a list of standard modules for installation
require './webmin-lib.pl';
&ui_print_header(undef, );
$mods = &list_standard_modules();
if (!ref($mods)) {
print "",&text('standard_failed', $mods),"\n";
}
else {
print "
";
print &ui_textbox("filter",$text{'ui_filterbox'}, 50, 0, undef,"style='width:100%;color:#aaa;' onkeyup=\"filter_match(this.value,'row',true);\" onfocus=\"if (this.value == '".$text{'ui_filterbox'}."') {this.value = '';this.style.color='#000';}\" onblur=\"if (this.value == '') {this.value = '".$text{'ui_filterbox'}."';this.style.color='#aaa';}\"");
print &ui_hr("style='width:100%;'")."
";
print "$text{'standard_header'}
\n";
if ($mods->[0]->[1] > &get_webmin_version()) {
print &text('standard_warn', $mods->[0]->[1]),"
\n";
}
print "\n";
@table = ( );
$cnt = 0;
foreach $m (@$mods) {
my $minfo = { 'os_support' => $m->[3] };
next if (!&check_os_support($minfo));
push(@table, [
&ui_link("#", $m->[0], undef, "onClick='return select(\"$m->[0]\");'"),
&html_escape($m->[4]),
]);
$cnt++;
}
print &ui_columns_table(undef, 100, \@table);
}
if ( $cnt >= 10 ) {
print "";
print "";
}
&ui_print_footer();