diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/diskdrake/interactive.pm | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 763198858..fac745479 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,5 +1,7 @@ - diskdrake: o fix garbaged error messages when umounting fs + o disallow "Use for loopback" when the partition used for loopback is + not formatted (#35535) Version 10.5.3 - 9 November 2007, by Pascal "Pixel" Rigaux diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index a96b9e0e0..e5c79a8a7 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -436,7 +436,7 @@ sub part_possible_actions { N_("Remove from RAID") => 'isPartOfRAID', N_("Remove from LVM") => 'isPartOfLVM', N_("Modify RAID") => 'canModifyRAID', - N_("Use for loopback") => '!$part->{real_mntpoint} && isMountableRW && !isSpecial && hasMntpoint && $::expert', + N_("Use for loopback") => '!$part->{real_mntpoint} && isMountableRW && !isSpecial && hasMntpoint && maybeFormatted && $::expert', ); my ($actions_names) = list2kv(@l); my $_all_hds = $all_hds; #- help perl_checker know the $all_hds *is* used in the macro below |