++ed by:

297 non-PAUSE users.

William J. Middleton


Tk::TextUndo - perl/tk text widget with bindings to undo changes.


    use Tk::TextUndo;
    $testundo = $parent->TextUndo(?option => value, ...?);


This IS-A text widget with an unlimited 'undo' history but without a re'undo' capability.


The TextUndo widget has the same bindings as the Text widget. Additionally to the Text widget there are the following bindings:

Event <L4>

undo the last change. Pressing <L4> several times undo step by step the changes made to the text widget.


The TextUndo widget has the same methods as Text widget. Additional method for the TextUndo widget are:


Loads the contents of the $filename into the text widget. Load() delete the previous contents of the text widget as well as it's undo history of the previous file.


Save contents of the text widget to a file. If the $otherfilename is not specified, the text widget contents writes the file of $filename used in the last Load() call. If no file was previously Load()'ed an error message pops up. The default filename of the last Load() call is not overwriten by $otherfilename.


widget, text, undo


Tk::Text(3), Tk::ROText(3)