From b7cb774e606c5f6f37544efa8263c77af95126b1 Mon Sep 17 00:00:00 2001 From: Scott Walters Date: Mon, 9 Aug 2010 14:39:53 -0400 Subject: [PATCH] Avoid warnings about odd numbers of form elements. session->form->process will return () when called in list context so force scalar context and it nicely gives us an undef. --- lib/WebGUI/Asset/Wobject/UserList.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/WebGUI/Asset/Wobject/UserList.pm b/lib/WebGUI/Asset/Wobject/UserList.pm index fdd4935a8..644d95c85 100644 --- a/lib/WebGUI/Asset/Wobject/UserList.pm +++ b/lib/WebGUI/Asset/Wobject/UserList.pm @@ -406,7 +406,7 @@ sub view { $var{'search_'.$fieldName.'_form'} = $self->getFormElement(\%formElementProperties); $var{'search_'.$fieldName.'_text'} = WebGUI::Form::Text($self->session, { -name => 'search_'.$fieldName, - -value => $form->process('search_'.$fieldName), + -value => scalar $form->process('search_'.$fieldName), }); $formElementProperties{value} = $form->process('search_Exact'.$fieldName); @@ -414,7 +414,7 @@ sub view { $var{'searchExact_'.$fieldName.'_form'} = $self->getFormElement(\%formElementProperties); $var{'searchExact_'.$fieldName.'_text'} = WebGUI::Form::Text($self->session, { -name => 'searchExact_'.$fieldName, - -value => $form->process('searchExact_'.$fieldName), + -value => scalar $form->process('searchExact_'.$fieldName), }); $var{'includeInSearch_'.$fieldName.'_hidden'} = WebGUI::Form::Hidden($self->session, { @@ -425,7 +425,7 @@ sub view { $var{'includeInSearch_'.$fieldName.'_checkBox'} = WebGUI::Form::Checkbox($self->session, { -name => 'includeInSearch_'.$fieldName, -value => '1', - -checked=> $form->process('includeInSearch_'.$fieldName), + -checked=> scalar $form->process('includeInSearch_'.$fieldName), }); } @@ -607,7 +607,7 @@ sub view { }); $var{searchFormQuery_form} = WebGUI::Form::text($self->session,{ name => 'search', - value => $form->process("search"), + value => scalar $form->process("search"), });