-my $pane = $mw->Scrolled(qw/Pane -scrollbars osow/)->pack(
-  -expand => 'yes',
-  -fill   => 'both',
-);
-my $frame = $pane->Frame->pack();
+my $frame = $mw->Frame->pack();