summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-01-19 16:07:17 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-01-19 16:07:17 +0000
commit2801469d9a7d75854dd461d5e8d88728c1e8659a (patch)
tree800effee8ca61b51af887f43f0974febee4419a4 /perl-install
parent56192fde0cd4f267a3abc525a27d9774022e8fd3 (diff)
downloaddrakx-2801469d9a7d75854dd461d5e8d88728c1e8659a.tar
drakx-2801469d9a7d75854dd461d5e8d88728c1e8659a.tar.gz
drakx-2801469d9a7d75854dd461d5e8d88728c1e8659a.tar.bz2
drakx-2801469d9a7d75854dd461d5e8d88728c1e8659a.tar.xz
drakx-2801469d9a7d75854dd461d5e8d88728c1e8659a.zip
Try to get more info on #45850
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 0aac21bbc..b52d3f98f 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -357,7 +357,7 @@ sub create_buttons4partitions {
# disks: helpers
################################################################################
sub current_hd() {
- $current_kind->{type} eq 'hd' or die 'current_hd called but $current_kind is not an hd';
+ $current_kind->{type} eq 'hd' or die 'current_hd called but $current_kind is not an hd ('.$current_kind->{type}.')';
$current_kind->{val};
}
sub current_part() {