From ca10613ef219d4bc594f06c79f23c067f9669034 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 19 Sep 2007 15:37:32 +0000 Subject: - individual package selection: make the package "Info" non editable --- perl-install/install/NEWS | 1 + perl-install/ugtk2.pm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index f811b41bb..d64ef3a0e 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,4 @@ +- individual package selection: make the package "Info" non editable - diskdrake: o "Clear All" defaults to LVM on full disk if drive is >4TB o do not allow partitions bigger than 2TB-1 on DOS MBR, nor partitions diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 54088e6d8..e88282175 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -908,7 +908,7 @@ sub ask_browse_tree_info { 1, gtknew('HBox', children_loose => [ gtknew('ScrolledWindow', child => $tree), gtknew('Frame', text => N("Info"), child => - gtknew('ScrolledWindow', child => my $info = gtknew('TextView')), + gtknew('ScrolledWindow', child => my $info = gtknew('TextView', editable => 0)), ) ]), 0, my $status = gtknew('Label'), if_($common->{auto_deps}, -- cgit v1.2.1