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

Test default label handling.

Browse source
This commit is contained in:
Colin Kuskie 2010-09-30 10:45:54 -07:00
parent ee1e896ef8
commit be35b8afe4
2 changed files with 24 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib/WebGUI/Shop/PayDriver.pm
View file

@ -62,6 +62,16 @@ property label => (
hoverHelp => ['label help', 'PayDriver'],
default => "Credit Card",
);
around label => sub {
my $orig = shift;
my $self = shift;
if (@_ > 0) {
my $label = shift;
$label = $self->getName($self->session) if $label eq '' || lc($label) eq 'untitled';
unshift @_, $label;
}
$self->$orig(@_);
};
property enabled => (
fieldType => 'yesNo',
label => ['enabled', 'PayDriver'],
@ -476,7 +486,6 @@ sub getName {
WebGUI::Error::InvalidParam->throw(error => q{Must provide a session variable})
unless ref $session eq 'WebGUI::Session';
my $definition = $class->meta->pluginName;
return WebGUI::International->new($session, 'Asset')->get(@{ $class->meta->pluginName });
}