Text::Editor::Vip::Buffer::Test - Support functions for testing
use Test::More qw(no_plan); use Text::Editor::Vip::Buffer ; use Text::Editor::Vip::Buffer::Test ; my $buffer = new Text::Editor::Vip::Buffer() ; is(TestDoUndo('$buffer->DeleteLine(3) ;', '$buffer->Insert("Line 1\nLine 2\nLine 3\nLine 4") ;'), 1, 'test undo after DeleteLine') ;
Support functions for testing
Displays the content of the buffer via the diag function.
Extract the do buffer from the buffer, applies it to another buffer and compares the buffers for equality
Given a script, obtained from a do buffer for example, this function checks the do and undo buffer creation.
An optional setup script can be passed. It is executed first.
Compares two buffers for equality. debugging information is displayed if the buffers aren't equal.
Compares the passed text with the content of the buffer. Returns '' if the text is equal to the buffer content. Returns a b<diff > if the texts won't match.
Displays the modification and selection information.
Khemir Nadim ibn Hamouda CPAN ID: NKH mailto:firstname.lastname@example.org http:// no web site
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.