Skip to content

Instantly share code, notes, and snippets.

Created Apr 7, 2011

What would you like to do?
package WebGUI::Form::MyOwnSpecialSelect;
use base 'WebGUI::Form::SelectList';
use Tie::IxHash;
# tell Perl that we're loaded and where from
# note that this code is in WebGUI/Asset/Wobject/ and WebGUI/Form/ only exists in our and perl's imagination
BEGIN { $INC{'WebGUI/Form/'} = $INC{'WebGUI/Asset/Wobject/'}; };
sub definition {
my $class = shift;
my $session = shift;
my $definition = shift || [];
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.