Update Macro docs to point to where DateTime is now

Add session vars to form element calls.
This commit is contained in:
Colin Kuskie 2006-01-17 05:13:48 +00:00
parent b1b4e50619
commit 25ed7e1527
6 changed files with 10 additions and 10 deletions

View file

@ -52,12 +52,12 @@ sub _drawQueryBuilder {
} }
# Static form fields # Static form fields
my $shortcutCriteriaField = WebGUI::Form::textarea({ my $shortcutCriteriaField = WebGUI::Form::textarea($self->session, {
name=>"shortcutCriteria", name=>"shortcutCriteria",
value=>$self->getValue("shortcutCriteria"), value=>$self->getValue("shortcutCriteria"),
extras=>'style="width: 100%" '.$self->{_disabled} extras=>'style="width: 100%" '.$self->{_disabled}
}); });
my $conjunctionField = WebGUI::Form::selectBox({ my $conjunctionField = WebGUI::Form::selectBox($self->session, {
name=>"conjunction", name=>"conjunction",
options=>{ options=>{
"AND" => $i18n->get("AND"), "AND" => $i18n->get("AND"),
@ -83,7 +83,7 @@ sub _drawQueryBuilder {
# The operator select field # The operator select field
my $opFieldName = "op_field".$i; my $opFieldName = "op_field".$i;
my $opField = WebGUI::Form::selectList({ my $opField = WebGUI::Form::selectList($self->session, {
name=>$opFieldName, name=>$opFieldName,
uiLevel=>5, uiLevel=>5,
options=>$operator{$fieldType}, options=>$operator{$fieldType},

View file

@ -105,7 +105,7 @@ sub www_editBranch {
-label=>$i18n->get(104), -label=>$i18n->get(104),
-uiLevel=>9, -uiLevel=>9,
-subtext=>'<br />'.$i18n->get("change").' '.WebGUI::Form::yesNo($self->session,{name=>"change_url"}), -subtext=>'<br />'.$i18n->get("change").' '.WebGUI::Form::yesNo($self->session,{name=>"change_url"}),
-value=>WebGUI::Form::selectBox({ -value=>WebGUI::Form::selectBox($self->session, {
name=>"baseUrlBy", name=>"baseUrlBy",
extras=>'onchange="toggleSpecificBaseUrl()"', extras=>'onchange="toggleSpecificBaseUrl()"',
id=>"baseUrlBy", id=>"baseUrlBy",
@ -114,7 +114,7 @@ sub www_editBranch {
specifiedBase=>"Specified Base", specifiedBase=>"Specified Base",
none=>"None" none=>"None"
} }
}).'<span id="baseUrl"></span> / '.WebGUI::Form::selectBox({ }).'<span id="baseUrl"></span> / '.WebGUI::Form::selectBox($self->session, {
name=>"endOfUrl", name=>"endOfUrl",
options=>{ options=>{
menuTitle=>$i18n->get(411), menuTitle=>$i18n->get(411),

View file

@ -211,7 +211,7 @@ sub www_manageTrash {
my $title = $child->getTitle; my $title = $child->getTitle;
$title =~ s/\'/\\\'/g; $title =~ s/\'/\\\'/g;
$output .= "assetManager.AddLine('" $output .= "assetManager.AddLine('"
.WebGUI::Form::checkbox({ .WebGUI::Form::checkbox($self->session, {
name=>'assetId', name=>'assetId',
value=>$child->getId value=>$child->getId
}) })

View file

@ -216,7 +216,7 @@ sub createAccount {
$vars->{'create.form.ldapConnection.label'} = $i18n->get("ldapConnection"); $vars->{'create.form.ldapConnection.label'} = $i18n->get("ldapConnection");
my $url = $self->session->url->page("op=auth;method=createAccount;connection="); my $url = $self->session->url->page("op=auth;method=createAccount;connection=");
$vars->{'create.form.ldapConnection'} = WebGUI::Form::selectBox({ $vars->{'create.form.ldapConnection'} = WebGUI::Form::selectBox($self->session, {
name=>"ldapConnection", name=>"ldapConnection",
options=>WebGUI::LDAPLink->getList($self->session,), options=>WebGUI::LDAPLink->getList($self->session,),
value=>[$connection->{ldapLinkId}], value=>[$connection->{ldapLinkId}],
@ -362,7 +362,7 @@ sub editUserFormSave {
sub editUserSettingsForm { sub editUserSettingsForm {
my $self = shift; my $self = shift;
my $f = WebGUI::HTMLForm->new($self->session); my $f = WebGUI::HTMLForm->new($self->session);
my $ldapConnection = WebGUI::Form::selectBox({ my $ldapConnection = WebGUI::Form::selectBox($self->session, {
name=>"ldapConnection", name=>"ldapConnection",
options=>WebGUI::LDAPLink->getList($self->session,), options=>WebGUI::LDAPLink->getList($self->session,),
value=>[$self->session->setting->get("ldapConnection")] value=>[$self->session->setting->get("ldapConnection")]

View file

@ -25,7 +25,7 @@ Macro for displaying dates formatted for reading by people using $session->datet
=head3 format string =head3 format string
A string specifying how to format the date using codes similar to those used by A string specifying how to format the date using codes similar to those used by
sprintf. See L<WebGUI::DateTime/"epochToHuman"> for a list of codes. sprintf. See L<WebGUI::Session::datetime/"epochToHuman"> for a list of codes.
=head3 date =head3 date

View file

@ -31,7 +31,7 @@ Text to prepend to the date. This can be the empty string.
=head3 format string =head3 format string
A string specifying how to format the date using codes similar to those used by A string specifying how to format the date using codes similar to those used by
sprintf. See L<WebGUI::DateTime/"epochToHuman"> for a list of codes. Uses sprintf. See L<WebGUI::Session::datetime/"epochToHuman"> for a list of codes. Uses
"%z" if empty. "%z" if empty.
=cut =cut