summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xbin/drakguard13
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');
}