Update Macro docs to point to where DateTime is now
Add session vars to form element calls.
This commit is contained in:
parent
b1b4e50619
commit
25ed7e1527
6 changed files with 10 additions and 10 deletions
|
|
@ -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},
|
||||||
|
|
|
||||||
|
|
@ -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),
|
||||||
|
|
|
||||||
|
|
@ -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
|
||||||
})
|
})
|
||||||
|
|
|
||||||
|
|
@ -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")]
|
||||||
|
|
|
||||||
|
|
@ -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
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -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
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue