diff options
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/rotation.pl')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/rotation.pl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/rotation.pl b/Perl/demos/Tk/demos/zinc_lib/rotation.pl index e8978dc..f82119a 100644 --- a/Perl/demos/Tk/demos/zinc_lib/rotation.pl +++ b/Perl/demos/Tk/demos/zinc_lib/rotation.pl @@ -18,8 +18,7 @@ my $mw = MainWindow->new(); # Text zone ########################################### -my $text = $mw->Scrolled(qw/Text -relief sunken -borderwidth 2 -setgrid true - -height 4 -scrollbars e/); +my $text = $mw->Text(-relief => 'sunken', -borderwidth => 2, -height => 4); $text->pack(qw/-expand yes -fill both/); $text->insert('0.0', |