From 6df0ef8d693176106b2356ef87a77f761f3ed1c0 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Mon, 18 Aug 2008 15:56:51 +0000
Subject: (ask_deselect_media__copy_on_disk) handle too big media list

---
 perl-install/install/steps_gtk.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index c464535f7..7ac3a1abe 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -684,7 +684,7 @@ sub ask_deselect_media__copy_on_disk {
 	$w->sync;
 	ugtk2::gtkadd(
 	    $w->{window},
-	    gtkpack(
+	    create_scrolled_window(gtkpack(
 		Gtk2::VBox->new(0, 5),
 	      @names > 1 ? (
 		Gtk2::WrappedLabel->new(formatAlaTeX(N("The following installation media have been found.
@@ -705,7 +705,7 @@ It will then continue from the hard drive and the packages will remain available
 		gtknew('HBox', children_tight => [
 		    gtknew('Button', text => N("Next"), clicked => sub { Gtk2->main_quit }),
 		]),
-	    ),
+	    )),
 	);
 	$w->main;
     }
-- 
cgit v1.2.1