display a busy cursor when selecting "Reload the packages list"

1 files changed, 1 insertions, 1 deletions

diff --git a/rpmdrake b/rpmdrake
index 2e75f6f8..cfa04a2d 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -1195,7 +1195,7 @@ Is it ok to continue?",
 	    $options->{rebuild_tree}->();
 	}, undef, '<Item>' ],
 	[ N("/_File") . N("/Reload the _packages list"), undef, sub {
-	    $pkgs_provider->({ skip_updating_mu => 1 }, $options->{tree_mode});
+	    slow_func($::main_window->window, sub { $pkgs_provider->({ skip_updating_mu => 1 }, $options->{tree_mode}) });
 	    $reset_search->();
 	    $size_selected = 0;
 	    $options->{rebuild_tree}->();