Form/* now all use getOriginalValue and getDefaultValue. This resolves the Layout bug where all the check lists could not be unchecked. Tests were updated, but still need a major overhaul.
This commit is contained in:
parent
96b7047d22
commit
173c2a12cd
42 changed files with 173 additions and 76 deletions
|
|
@ -132,7 +132,7 @@ Returns the WebGUI::Storage object for this control.
|
|||
|
||||
sub getStorageLocation {
|
||||
my $self = shift;
|
||||
my $value = $self->getDefaultValue;
|
||||
my $value = $self->getOriginalValue;
|
||||
my $storage = WebGUI::Storage::Image->get($self->session, $value) if ($value);
|
||||
return $storage;
|
||||
}
|
||||
|
|
@ -181,7 +181,7 @@ Displays the image using an img tag.
|
|||
|
||||
sub getValueAsHtml {
|
||||
my ($self) = @_;
|
||||
my $value = $self->getDefaultValue;
|
||||
my $value = $self->getOriginalValue;
|
||||
return '' unless $value;
|
||||
my $location = WebGUI::Storage::Image->get($self->session, $value);
|
||||
my $file = shift @{ $location->getFiles };
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue