diff options
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/drakguard | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/bin/drakguard b/bin/drakguard index 74a3fa7..6028518 100755 --- a/bin/drakguard +++ b/bin/drakguard @@ -15,6 +15,13 @@ use network::shorewall; use network::squid; use services; +my $dansguardian_file = "/etc/dansguardian/dansguardianf1.conf"; +my %dansguardian_levels = ( + 160 => N_("Low"), + 100 => N_("Normal"), + 50 => N_("High"), +); + my $toolname = 'drakguard'; my $title = N("Parental Control"); my $icon = "IC-control-52"; @@ -64,10 +71,10 @@ gtkadd($w->{window}, gtknew('Label_Left', text_markup => N("Control level"), alignment => [ 0, 0.5 ]), gtknew('ComboBox', - list => [ N_("Low"), N_("Normal"), N_("High") ], + list => [ keys %dansguardian_levels ], text_ref => \$level, sensitive_ref => \$enable, - format => \&translate), + format => sub { translate($dansguardian_levels{$_[0]}) }), ]), 1, gtknew('Label'), 0, gtknew('Title2', label => N("User access")), @@ -165,7 +172,7 @@ sub unwhitelist { sub quit_gui() { Gtk2->main_quit } sub load() { - $level ||= "Normal"; + $level ||= 100; $enable = services::starts_on_boot('dansguardian'); } |