Add tests for Captcha, ClassName, Codearea, HTMLArea, IntSlider, RadioList, Slider

This commit is contained in:
Colin Kuskie 2010-09-20 17:32:55 -07:00
parent 8326417f06
commit a25e40d6a5
7 changed files with 133 additions and 0 deletions

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::Captcha;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::Text/;
1;

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::ClassName;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::ReadOnly/;
1;

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::Codearea;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::Textarea/;
1;

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::HTMLArea;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::Textarea/;
1;

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::IntSlider;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::Slider/;
1;

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::RadioList;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::List/;
1;

View file

@ -0,0 +1,19 @@
package Test::WebGUI::Form::Slider;
#-------------------------------------------------------------------
# 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
#-------------------------------------------------------------------
use strict;
use warnings;
use Test::More;
use base qw/Test::WebGUI::Form::Control/;
1;