summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--NEWS1
-rwxr-xr-xdraksnapshot-config9
2 files changed, 8 insertions, 2 deletions
diff --git a/NEWS b/NEWS
index 9b8d8ee..56df950 100644
--- a/NEWS
+++ b/NEWS
@@ -1,5 +1,6 @@
- configurator:
o add a tooltip in order to explain what are intervals (#39509)
+ o disable advanced settings if "backup the whole system" is selected
o hide list under an "Advanced" expander
o set 755 perms on cron entry (#39699)
o use spin buttons for intervals
diff --git a/draksnapshot-config b/draksnapshot-config
index 722edd6..56cb135 100755
--- a/draksnapshot-config
+++ b/draksnapshot-config
@@ -101,12 +101,17 @@ my %interval_titles = (
my (%entries, $where);
+my $box;
gtkadd($my_win->{window},
gtknew('VBox', children => [
if_(!$::isEmbedded, 0, Gtk2::Banner->new('draksnapshot-big',
N("Backup snapshots configuration"))),
0, gtknew('Title1', label => N("Settings")),
- 0, gtknew('CheckButton', text => N("Backup the whole system")),
+ 0, gtknew('CheckButton', text => N("Backup the whole system"),
+ toggled => sub {
+ my ($w) = @_;
+ $box->set_sensitive(!$w->get_active);
+ }),
0, gtknew('HBox', spacing => 5, children => [
0, gtknew('Label_Left', text => N("Where to backup")),
1, $where =
@@ -146,7 +151,7 @@ gtkadd($my_win->{window},
} @ordered_intervals
]),
0, gtknew('Expander', text => N("Advanced"),
- child => gtknew('VBox', children => [
+ child => $box = gtknew('VBox', children => [
0, gtknew('Title2', label => N("Backup list")),
1, format_list($backup_list, 1),
0, gtknew('Title2', label => N("Exclude list")),