oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

added rfe #740: Thingy Pre-Text

Browse source
This commit is contained in:
Yung Han Khoe 2008-10-20 16:08:09 +00:00
parent 0b21273065
commit 9e2ec505c0
7 changed files with 54 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lib/WebGUI/Asset/Wobject/Thingy.pm
View file

@ -634,7 +634,13 @@ sub getEditFieldForm {
});
$f->raw($self->getHtmlWithModuleWrapper($dialogPrefix."_defaultValue_module",$defaultValueForm,
$i18n->get('default value label'),$i18n->get('default value description')));
$f->text(
-name=>"pretext",
-value=>$field->{pretext},
-label=>$i18n->get('pretext label'),
-hoverHelp=>$i18n->get('pretext description'),
);
$f->text(
-name=>"subtext",
-value=>$field->{subtext},
@ -1603,6 +1609,9 @@ sub www_editThing {
else{
$formElement = $self->getFormElement($field);
}
if ($field->{pretext}){
$formElement = '<span class="formPretext">'.$field->{pretext}.'</span><br />'.$formElement;
}
if ($field->{subtext}){
$formElement .= '<br /><span class="formSubtext">'.$field->{subtext}.'</span>';
}
@ -1997,6 +2006,7 @@ sub www_editFieldSave {
fieldType=>$fieldType,
defaultValue=>$defaultValue,
possibleValues=>$self->session->form->process("possibleValues"),
pretext=>$self->session->form->process("pretext"),
subtext=>$self->session->form->process("subtext"),
status=>$self->session->form->process("status"),
size=>$self->session->form->process("size"),
@ -2030,6 +2040,9 @@ sub www_editFieldSave {
else{
$formElement = $self->getFormElement(\%properties);
}
if ($properties{pretext}){
$formElement = '<span class="formSubtext">'.$properties{pretext}.'</span><br />'.$formElement;
}
if ($properties{subtext}){
$formElement .= '<br /><span class="formSubtext">'.$properties{subtext}.'</span>';
}
@ -2243,6 +2256,7 @@ sub editThingData {
"isHidden" => $hidden,
"isVisible" => ($field{status} eq "visible" && !$hidden),
"isRequired" => ($field{status} eq "required" && !$hidden),
"pretext" => $field{pretext},
"subtext" => $field{subtext},
);
push(@field_loop, { map {("field_".$_ => $fieldProperties{$_})} keys(%fieldProperties) });