diff options
| -rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index f6d1a6760..248bb04ed 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -494,6 +494,8 @@ sub main { if ($o->isa('interactive::gtk')) { require mygtk2; import mygtk2 qw(gtknew); + require ugtk2; + ugtk2->import(qw(:wrappers)); my $mainw = ugtk2->new(N("Partitioning"), %$o, if__($::main_window, transient => $::main_window)); $mainw->{box_allow_grow} = 1; |