Remove more deprecated code.
This commit is contained in:
parent
2eb7b11880
commit
f20146dece
1 changed files with 14 additions and 10 deletions
|
|
@ -99,31 +99,35 @@ sub process {
|
||||||
$action = $session->url->page(undef,1);
|
$action = $session->url->page(undef,1);
|
||||||
$action =~ s/http:/https:/;
|
$action =~ s/http:/https:/;
|
||||||
}
|
}
|
||||||
|
use WebGUI::Form::Hidden;
|
||||||
|
use WebGUI::Form::Text;
|
||||||
|
use WebGUI::Form::Password;
|
||||||
|
use WebGUI::Form::Submit;
|
||||||
$var{'form.header'} = WebGUI::Form::formHeader($session,{action=>$action})
|
$var{'form.header'} = WebGUI::Form::formHeader($session,{action=>$action})
|
||||||
.WebGUI::Form::hidden($session,{
|
.WebGUI::Form::Hidden->new($session,{
|
||||||
name=>"op",
|
name=>"op",
|
||||||
value=>"auth"
|
value=>"auth"
|
||||||
})
|
})-toHtml
|
||||||
.WebGUI::Form::hidden($session,{
|
.WebGUI::Form::Hidden->new($session,{
|
||||||
name=>"method",
|
name=>"method",
|
||||||
value=>"login"
|
value=>"login"
|
||||||
});
|
})->toHtml;
|
||||||
$var{'username.label'} = $i18n->get(50, 'WebGUI');
|
$var{'username.label'} = $i18n->get(50, 'WebGUI');
|
||||||
$var{'username.form'} = WebGUI::Form::text($session,{
|
$var{'username.form'} = WebGUI::Form::Text->new($session,{
|
||||||
name=>"username",
|
name=>"username",
|
||||||
size=>$boxSize,
|
size=>$boxSize,
|
||||||
extras=>'class="loginBoxField"'
|
extras=>'class="loginBoxField"'
|
||||||
});
|
})->toHtml;
|
||||||
$var{'password.label'} = $i18n->get(51, 'WebGUI');
|
$var{'password.label'} = $i18n->get(51, 'WebGUI');
|
||||||
$var{'password.form'} = WebGUI::Form::password($session,{
|
$var{'password.form'} = WebGUI::Form::Password->new($session,{
|
||||||
name=>"identifier",
|
name=>"identifier",
|
||||||
size=>$boxSize,
|
size=>$boxSize,
|
||||||
extras=>'class="loginBoxField"'
|
extras=>'class="loginBoxField"'
|
||||||
});
|
})->toHtml;
|
||||||
$var{'form.login'} = WebGUI::Form::submit($session,{
|
$var{'form.login'} = WebGUI::Form::Submit->new($session,{
|
||||||
value=>$i18n->get(52, 'WebGUI'),
|
value=>$i18n->get(52, 'WebGUI'),
|
||||||
extras=>'class="loginBoxButton"'
|
extras=>'class="loginBoxButton"'
|
||||||
});
|
})->toHtml;
|
||||||
$var{'account.create.url'} = $session->url->page('op=auth;method=createAccount');
|
$var{'account.create.url'} = $session->url->page('op=auth;method=createAccount');
|
||||||
$var{'account.create.label'} = $i18n->get(407, 'WebGUI');
|
$var{'account.create.label'} = $i18n->get(407, 'WebGUI');
|
||||||
$var{'form.footer'} = WebGUI::Form::formFooter($session,);
|
$var{'form.footer'} = WebGUI::Form::formFooter($session,);
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue