Write a test that says that loading Form plugins from a place other than /data/WebGUI/lib/WebGUI works.

This commit is contained in:
Colin Kuskie 2009-09-08 17:05:00 -07:00
parent b8127bafec
commit 1671aefee5
2 changed files with 92 additions and 0 deletions

View file

@ -0,0 +1,52 @@
package WebGUI::Form::FormTest;
=head1 LEGAL
-------------------------------------------------------------------
WebGUI is Copyright 2001-2009 Plain Black Corporation.
-------------------------------------------------------------------
Please read the legal notices (docs/legal.txt) and the license
(docs/license.txt) that came with this distribution before using
this software.
-------------------------------------------------------------------
http://www.plainblack.com info@plainblack.com
-------------------------------------------------------------------
=cut
use strict;
use base 'WebGUI::Form::Control';
use WebGUI::International;
=head1 NAME
Package WebGUI::Form::FormTest
=head1 DESCRIPTION
Dummy Form plugin for testing dynamic loading of Forms from other locations.
=head1 SEE ALSO
This is a subclass of WebGUI::Form::Control.
=head1 METHODS
The following methods are specifically available from this class. Check the superclass for additional methods.
=cut
#-------------------------------------------------------------------
=head2 getName ( session )
Returns the human readable name of this control.
=cut
sub getName {
my ($self, $session) = @_;
return 'FormTest';
}
1;