oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make sure tha Form::FieldType can find subclasses (in subdirectories) of Forms.

Browse source
This commit is contained in:
Colin Kuskie 2008-12-23 00:45:34 +00:00
parent d502f4b5de
commit 6fc73d854b
2 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Form/FieldType.pm
View file

@ -20,7 +20,7 @@ use Tie::IxHash;
use WebGUI::International;
use WebGUI::Pluggable;
use WebGUI::Utility;
use Module::Find qw(findsubmod);
use Module::Find qw(findallmod);
=head1 NAME
@ -113,7 +113,7 @@ sub getTypes {
my $self = shift;
my @types = @{$self->get('types')};
unless (scalar(@types)) {
my @classes = findsubmod 'WebGUI::Form';
my @classes = findallmod 'WebGUI::Form';
for my $class (@classes) {
if ($class =~ /^WebGUI::Form::(.*)/) {
my $type = $1;