From 235cd7c08f499303c378111a3a589715420404f3 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Mon, 25 Jul 2005 03:34:46 +0000 Subject: [PATCH] fixed typos from hover help conversion --- lib/WebGUI/Operation/Group.pm | 45 +++++++++++++------------ lib/WebGUI/Operation/LDAPLink.pm | 20 +++++------ lib/WebGUI/Operation/ProfileSettings.pm | 4 +-- lib/WebGUI/Operation/Settings.pm | 6 ++-- 4 files changed, 39 insertions(+), 36 deletions(-) diff --git a/lib/WebGUI/Operation/Group.pm b/lib/WebGUI/Operation/Group.pm index b32bf554c..e2c496987 100644 --- a/lib/WebGUI/Operation/Group.pm +++ b/lib/WebGUI/Operation/Group.pm @@ -270,26 +270,26 @@ sub www_editGroup { $f->yesNo( -name=>"expireNotify", -value=>$g->expireNotify, - -label=>WebGUI::International::get(865) - -hoverHelp=>WebGUI::International::get('865 description') + -label=>WebGUI::International::get(865), + -hoverHelp=>WebGUI::International::get('865 description'), ); $f->integer( -name=>"expireNotifyOffset", -value=>$g->expireNotifyOffset, - -label=>WebGUI::International::get(864) - -hoverHelp=>WebGUI::International::get('864 description') + -label=>WebGUI::International::get(864), + -hoverHelp=>WebGUI::International::get('864 description'), ); $f->textarea( -name=>"expireNotifyMessage", -value=>$g->expireNotifyMessage, - -label=>WebGUI::International::get(866) - -hoverHelp=>WebGUI::International::get('866 description') + -label=>WebGUI::International::get(866), + -hoverHelp=>WebGUI::International::get('866 description'), ); $f->integer( -name=>"deleteOffset", -value=>$g->deleteOffset, - -label=>WebGUI::International::get(863) - -hoverHelp=>WebGUI::International::get('863 description') + -label=>WebGUI::International::get(863), + -hoverHelp=>WebGUI::International::get('863 description'), ); if ($session{setting}{useKarma}) { $f->integer( @@ -302,14 +302,14 @@ sub www_editGroup { $f->textarea( -name=>"ipFilter", -value=>$g->ipFilter, - -label=>WebGUI::International::get(857) - -hoverHelp=>WebGUI::International::get('857 description') + -label=>WebGUI::International::get(857), + -hoverHelp=>WebGUI::International::get('857 description'), ); $f->textarea( -name=>"scratchFilter", -value=>$g->scratchFilter, - -label=>WebGUI::International::get(945) - -hoverHelp=>WebGUI::International::get('945 description') + -label=>WebGUI::International::get(945), + -hoverHelp=>WebGUI::International::get('945 description'), ); if ($session{form}{gid} eq "3") { $f->hidden( @@ -324,14 +324,14 @@ sub www_editGroup { $f->yesNo( -name=>"autoAdd", -value=>$g->autoAdd, - -label=>WebGUI::International::get(974) - -hoverHelp=>WebGUI::International::get('974 description') + -label=>WebGUI::International::get(974), + -hoverHelp=>WebGUI::International::get('974 description'), ); $f->yesNo( -name=>"autoDelete", -value=>$g->autoDelete, - -label=>WebGUI::International::get(975) - -hoverHelp=>WebGUI::International::get('975 description') + -label=>WebGUI::International::get(975), + -hoverHelp=>WebGUI::International::get('975 description'), ); } $f->databaseLink( @@ -340,8 +340,8 @@ sub www_editGroup { $f->textarea( -name=>"dbQuery", -value=>$g->dbQuery, - -label=>WebGUI::International::get(1005) - -hoverHelp=>WebGUI::International::get('1005 description') + -label=>WebGUI::International::get(1005), + -hoverHelp=>WebGUI::International::get('1005 description'), ); $f->text( -name=>"ldapGroup", @@ -447,16 +447,19 @@ sub www_emailGroup { $f->email( -name=>"from", -value=>$session{setting}{companyEmail}, - -label=>WebGUI::International::get(811) + -label=>WebGUI::International::get(811), + -hoverHelp=>WebGUI::International::get('811 description'), ); $f->text( -name=>"subject", - -label=>WebGUI::International::get(229) + -label=>WebGUI::International::get(229), + -hoverHelp=>WebGUI::International::get('229 description'), ); $f->textarea( -name=>"message", -label=>WebGUI::International::get(230), - -rows=>(5+$session{setting}{textAreaRows}) + -hoverHelp=>WebGUI::International::get('230 description'), + -rows=>(5+$session{setting}{textAreaRows}), ); $f->submit(WebGUI::International::get(810)); $output = $f->print; diff --git a/lib/WebGUI/Operation/LDAPLink.pm b/lib/WebGUI/Operation/LDAPLink.pm index 9e67223d6..e3ae705ea 100644 --- a/lib/WebGUI/Operation/LDAPLink.pm +++ b/lib/WebGUI/Operation/LDAPLink.pm @@ -145,35 +145,35 @@ sub www_editLDAPLink { $f->yesNo( -name=>"ldapSendWelcomeMessage", -value=>$db{ldapSendWelcomeMessage}, - -label=>WebGUI::International::get(868,"AuthLDAP") - -hoverHelp=>WebGUI::International::get('868 description',"AuthLDAP") + -label=>WebGUI::International::get(868,"AuthLDAP"), + -hoverHelp=>WebGUI::International::get('868 description',"AuthLDAP"), ); $f->textarea( -name=>"ldapWelcomeMessage", -value=>$db{ldapWelcomeMessage}, - -label=>WebGUI::International::get(869,"AuthLDAP") - -hoverHelp=>WebGUI::International::get('869 description',"AuthLDAP") + -label=>WebGUI::International::get(869,"AuthLDAP"), + -hoverHelp=>WebGUI::International::get('869 description',"AuthLDAP"), ); $f->template( -name=>"ldapAccountTemplate", -value=>$db{ldapAccountTemplate}, -namespace=>"Auth/LDAP/Account", - -label=>WebGUI::International::get("account template","AuthLDAP") - -hoverHelp=>WebGUI::International::get("account template description","AuthLDAP") + -label=>WebGUI::International::get("account template","AuthLDAP"), + -hoverHelp=>WebGUI::International::get("account template description","AuthLDAP"), ); $f->template( -name=>"ldapCreateAccountTemplate", -value=>$db{ldapCreateAccountTemplate}, -namespace=>"Auth/LDAP/Create", - -label=>WebGUI::International::get("create account template","AuthLDAP") - -hoverHelp=>WebGUI::International::get("create account template description","AuthLDAP") + -label=>WebGUI::International::get("create account template","AuthLDAP"), + -hoverHelp=>WebGUI::International::get("create account template description","AuthLDAP"), ); $f->template( -name=>"ldapLoginTemplate", -value=>$db{ldapLoginTemplate}, -namespace=>"Auth/LDAP/Login", - -label=>WebGUI::International::get("login template","AuthLDAP") - -hoverHelp=>WebGUI::International::get("login template description","AuthLDAP") + -label=>WebGUI::International::get("login template","AuthLDAP"), + -hoverHelp=>WebGUI::International::get("login template description","AuthLDAP"), ); $f->submit; diff --git a/lib/WebGUI/Operation/ProfileSettings.pm b/lib/WebGUI/Operation/ProfileSettings.pm index c091fdfa9..4a6cb1555 100644 --- a/lib/WebGUI/Operation/ProfileSettings.pm +++ b/lib/WebGUI/Operation/ProfileSettings.pm @@ -120,7 +120,7 @@ sub www_editProfileCategory { $f->yesNo( -name=>"editable", -value=>$data{editable}, - -label=>WebGUI::International::get(897,"WebGUIProfile") + -label=>WebGUI::International::get(897,"WebGUIProfile"), ); $f->submit; $output .= $f->print; @@ -170,7 +170,7 @@ sub www_editProfileField { $f->yesNo( -name=>"editable", -value=>$data{editable}, - -label=>WebGUI::International::get(897,"WebGUIProfile") + -label=>WebGUI::International::get(897,"WebGUIProfile"), ); $f->yesNo( -name=>"required", diff --git a/lib/WebGUI/Operation/Settings.pm b/lib/WebGUI/Operation/Settings.pm index 67321b1ad..e4c6f7ed4 100644 --- a/lib/WebGUI/Operation/Settings.pm +++ b/lib/WebGUI/Operation/Settings.pm @@ -1,4 +1,4 @@ -package WebGUI::Operation::Settings; +PACKAge WebGUI::Operation::Settings; #------------------------------------------------------------------- # WebGUI is Copyright 2001-2005 Plain Black Corporation. @@ -84,7 +84,7 @@ sub www_editSettings { $tabform->getTab("content")->text( -name=>"urlExtension", -value=>$session{setting}{urlExtension}, - -label=>$i18n->get("url extension") + -label=>$i18n->get("url extension"), ); $tabform->getTab("content")->integer( -name=>"maxAttachmentSize", @@ -179,7 +179,7 @@ sub www_editSettings { sitename=>$i18n->get(1070), HTTP_HOST=>$i18n->get(1071) }, - -label=>$i18n->get(1069) + -label=>$i18n->get(1069), ); # user settings $tabform->getTab("user")->yesNo(