summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2015-05-14 10:43:52 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2015-05-14 10:44:25 +0200
commit4ba92c9e4e52c205f0a4504f49fc1c47ddfc360d (patch)
tree17f80cb5b084da3fc8b5f5cb9a4f6ed8d87ddb21 /perl-install/diskdrake
parente398b3cd6490c60035da843b37e555e89367b644 (diff)
downloaddrakx-4ba92c9e4e52c205f0a4504f49fc1c47ddfc360d.tar
drakx-4ba92c9e4e52c205f0a4504f49fc1c47ddfc360d.tar.gz
drakx-4ba92c9e4e52c205f0a4504f49fc1c47ddfc360d.tar.bz2
drakx-4ba92c9e4e52c205f0a4504f49fc1c47ddfc360d.tar.xz
drakx-4ba92c9e4e52c205f0a4504f49fc1c47ddfc360d.zip
fix gtk+3 regression crash with --dav (mga#13204)
Diffstat (limited to 'perl-install/diskdrake')
-rw-r--r--perl-install/diskdrake/dav.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/diskdrake/dav.pm b/perl-install/diskdrake/dav.pm
index 317452f72..90510aaa0 100644
--- a/perl-install/diskdrake/dav.pm
+++ b/perl-install/diskdrake/dav.pm
@@ -21,6 +21,7 @@ points, select \"New\".")) },
[
(map {
my $dav = $_;
+ $dav->{mntpoint} ||= 'none';
{ label => $dav->{device}, val => $dav->{mntpoint}, clicked_may_quit => sub { config($in, $dav, $all_hds); 1 } } } @$davs),
{ val => N("New"), clicked_may_quit => sub { create($in, $all_hds); 1 } },
{ val => N("Quit"), clicked_may_quit => sub { $quit = 1 } },