From 67cfbb987c02f8725cfaf2cf4bc5f623ff10c07e Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Sun, 8 Dec 2013 23:58:10 +0100
Subject: log partitioning wizard failures (mga#11924)

---
 perl-install/NEWS                      | 3 +++
 perl-install/fs/partitioning_wizard.pm | 1 +
 2 files changed, 4 insertions(+)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index 0f137de52..1c9c60aa3 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,6 @@
+- partitioning wizard:
+  o log failures (mga#11924)
+
 Version 16.11 - 6 December 2013
 
 - fix a crash in rpmdrake when package list is empty (mga#11901)
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index 4749deec1..fbe72f8bc 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -595,6 +595,7 @@ sub main {
         if ($err =~ /wizcancel/) {
             $_->destroy foreach $::WizardTable->get_children;
         } else {
+            log::l("Partitioning failed: $err");
             $o->ask_warn('', N("Partitioning failed: %s", formatError($err)));
         }
     }
-- 
cgit v1.2.1