diff options
| -rw-r--r-- | perl-install/NEWS | 3 | ||||
| -rwxr-xr-x | perl-install/standalone/draksec | 8 |
2 files changed, 6 insertions, 5 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 57c20609d..fee6909ff 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- draksec: + o use expanders for clarity + Version 16.17 - 20 December 2013 - drakfont: diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec index cda3a8705..1626e7d74 100755 --- a/perl-install/standalone/draksec +++ b/perl-install/standalone/draksec @@ -202,11 +202,10 @@ gtkpack_($vbox, ])), 1, gtkshow(create_scrolled_window( gtknew('VBox', children => [ - 1, create_packtable( - $common_opts, map { my ($title, $progs) = @$_; - ([ gtknew('Title2', label => $title), '' ], + (0, gtknew('Expander', use_markup => 1, text => mygtk3::title1_to_markup($title), child => create_packtable( + $common_opts, map { [ gtkshow(gtknew('Label_Left', line_wrap => 1, text => $descr{$_} || $_)), @@ -218,7 +217,7 @@ gtkpack_($vbox, ) ]; } split(' ', $progs) - ); + ))); } ( [ N("Software Management"), 'drakrpm drakrpm-update drakrpm-editmedia' ], [ N("Hardware"), 'drak3d drakx11 drakmouse drakkeyboard drakups' ], @@ -226,7 +225,6 @@ gtkpack_($vbox, [ N("System"), 'drakauth drakfont draklog drakxservices drakuser drakclock' ], [ N("Boot"), 'drakboot' ], ) - ) ]))), 0, create_okcancel(my $oc = |