(run_treeview_dialog) handle migrating config file from rpmdrake <= 4.9

2 files changed, 10 insertions, 0 deletions

diff --git a/NEWS b/NEWS
index 4d37cdfa..e4bbd701 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,6 @@
+- rpmdrake:
+  o handle migrating config file from rpmdrake <= 4.9
+
 Version 4.9.3 - 17 March 2008, Thierry Vignaud
 
 - rpmdrake:
diff --git a/rpmdrake b/rpmdrake
index 6e0e6d99..bd82e142 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -348,6 +348,13 @@ sub run_treeview_dialog {
 
     my %rfilters = reverse %filters;
 
+
+    # handle migrating config file from rpmdrake <= 4.9
+    if (member($default_list_mode, keys %filters)) {
+        $filter->[0] = $default_list_mode;
+        $default_list_mode = 'all';
+    }
+
     $options->{tree_mode} = $default_list_mode;
 
     my %modes = (