diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index 7994a3662..3c49bb64e 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -39,7 +39,6 @@ - fixed: WebGUI Search errors - boolean search using filtering does not work - Updated User->profileField method to return all default values as a scalar, rather than just the first option in the list. - - fixed: Layout can now uncheck all Assets that are hidden. This also resolves any CheckList issue so that all buttons can be left blank. 7.5.18 - fixed: Collateral Image Manager broken in Firefox 3 diff --git a/lib/WebGUI/Form/CheckList.pm b/lib/WebGUI/Form/CheckList.pm index f3ab5ff5c..62ba6001f 100644 --- a/lib/WebGUI/Form/CheckList.pm +++ b/lib/WebGUI/Form/CheckList.pm @@ -86,41 +86,6 @@ sub getName { return WebGUI::International->new($session, 'WebGUI')->get('941'); } -#------------------------------------------------------------------- - -=head2 getValue ( [ value ] ) - -Returns an array or a carriage return ("\n") separated scalar depending upon whether you're returning the values into an array or a scalar. Also parses the input values (wherever they come from) to see if it's a scalar then it splits on \n. - -=head3 value - -Optional values to process, instead of POST input. - -=cut - -sub getValue { - my ($self, $value) = @_; - my @values = (); - if (defined $value) { - if (ref $value eq "ARRAY") { - @values = @{$value}; - } - else { - $value =~ s/\r//g; - @values = split "\n", $value; - } - } - if (scalar @values < 1 && $self->session->request) { - my $value = $self->session->form->param($self->get("name")); - if (defined $value) { - @values = $self->session->form->param($self->get("name")); - } - } - return wantarray ? @values : join("\n",@values); -} - - - #------------------------------------------------------------------- =head2 getSelectAllButton ( ) diff --git a/t/Form/CheckList.t b/t/Form/CheckList.t index 1838b7802..f2b32dde9 100644 --- a/t/Form/CheckList.t +++ b/t/Form/CheckList.t @@ -99,8 +99,3 @@ is( $inputs[0]->{value}, WebGUI::International->new($session,"Form_CheckList")->get("selectAll label"), 'The value is internationalized' ); - -my $checkl1 = WebGUI::Form::CheckList->new($session, {'defaultValue' => 1}); -is($checkl1->getValue(10), 10, "Get simple passed in value"); -is($checkl1->getValue(), '', "Get empty value in value"); -is($checkl1->get('defaultValue'), 1, "Check default value property");