Why is that
$text_undo = $down_packer1->Scrolled(
'TextUndo',
-scrollbars => 'osoe',
-height => 20,
-width => 80,
-font => "$text_font $text_size",
-wrap => 'none',
)->pack(
-fill => 'both',
-expand => 1,
-side => 'top',
-pady => 7,
);
...
$text_undo->Tk::Text::delete('1.0', 'end'); #I need Tk::Text::delete in order
not to disturb UNDO stack
throws an error:
Tk::Error: bad option "delete": must be cget, or configure at
c:/Perl/site/lib/Tk.pm line 252.
Tk callback for .frame.frame
<Key-Return>
(command bound to event)
Thanks,
Artem A. Avetisyan.
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
