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

forward port of colins 6.8.4 bugwork

Browse source
This commit is contained in:
Colin Kuskie 2006-01-02 18:51:38 +00:00
parent 8d8c6d8065
commit 21188e7949
4 changed files with 38 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -508,6 +508,7 @@ sub processPropertiesFromFormPost {
if ($self->session->form->process("assetId") eq "new") {
$self->setCollateral("DataForm_field","DataForm_fieldId",{
DataForm_fieldId=>"new",
DataForm_tabId=>0,
name=>"from",
label=>WebGUI::International::get(10,"Asset_DataForm"),
status=>"editable",
@ -517,6 +518,7 @@ sub processPropertiesFromFormPost {
});
$self->setCollateral("DataForm_field","DataForm_fieldId",{
DataForm_fieldId=>"new",
DataForm_tabId=>0,
name=>"to",
label=>WebGUI::International::get(11,"Asset_DataForm"),
status=>"hidden",
@ -527,6 +529,7 @@ sub processPropertiesFromFormPost {
});
$self->setCollateral("DataForm_field","DataForm_fieldId",{
DataForm_fieldId=>"new",
DataForm_tabId=>0,
name=>"cc",
label=>WebGUI::International::get(12,"Asset_DataForm"),
status=>"hidden",
@ -536,6 +539,7 @@ sub processPropertiesFromFormPost {
});
$self->setCollateral("DataForm_field","DataForm_fieldId",{
DataForm_fieldId=>"new",
DataForm_tabId=>0,
name=>"bcc",
label=>WebGUI::International::get(13,"Asset_DataForm"),
status=>"hidden",
@ -545,6 +549,7 @@ sub processPropertiesFromFormPost {
});
$self->setCollateral("DataForm_field","DataForm_fieldId",{
DataForm_fieldId=>"new",
DataForm_tabId=>0,
name=>"subject",
label=>WebGUI::International::get(14,"Asset_DataForm"),
status=>"editable",