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

many bug fixes

Browse source
This commit is contained in:
JT Smith 2005-03-04 22:49:34 +00:00
parent 66e2028c3a
commit 2a1db10c8b
7 changed files with 22 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -229,10 +229,10 @@ sub getEditForm {
-value=>$self->getValue("mailData")
);
if ($self->getId eq "new" && $session{form}{proceed} ne "manageAssets") {
$self->getTab("properties")->whatNext(
$tabform->getTab("properties")->whatNext(
-options=>{
addField=>WebGUI::International::get(76,"DataForm"),
backToPage=>WebGUI::International::get(745,"DataForm")
editField=>WebGUI::International::get(76,"DataForm"),
""=>WebGUI::International::get(745,"DataForm")
},
-value=>"editField"
);
@ -749,10 +749,10 @@ sub www_editField {
if ($session{form}{fid} eq "new" && $session{form}{proceed} ne "manageAssets") {
$f->whatNext(
-options=>{
addField=>WebGUI::International::get(76,"DataForm"),
backToPage=>WebGUI::International::get(745,"DataForm")
editField=>WebGUI::International::get(76,"DataForm"),
""=>WebGUI::International::get(745,"DataForm")
},
-value=>"addField"
-value=>"editField"
);
}
$f->submit;
@ -790,10 +790,6 @@ sub www_editFieldSave {
" where DataForm_fieldId=".quote($session{form}{fid}));
}
$self->reorderCollateral("DataForm_field","DataForm_fieldId", _tonull("DataForm_tabId",$session{form}{tid})) if ($session{form}{fid} ne "new");
if ($session{form}{proceed} eq "addField") {
$session{form}{fid} = "new";
return $self->www_editField();
}
return "";
}
@ -824,11 +820,11 @@ sub www_editTab {
if ($session{form}{tid} eq "new") {
$f->whatNext(
-options=>{
addTab=>WebGUI::International::get(103,"DataForm"),
editTab=>WebGUI::International::get(103,"DataForm"),
backToPage=>WebGUI::International::get(745,"DataForm")
""=>WebGUI::International::get(745,"DataForm")
},
-value=>"addTab"
-value=>"editTab"
);
}
$f->submit;
@ -850,10 +846,6 @@ sub www_editTabSave {
label=>$session{form}{label},
subtext=>$session{form}{subtext}
});
if ($session{form}{proceed} eq "addTab") {
$session{form}{tid} = "new";
return $self->www_editTab();
}
return "";
}

8
lib/WebGUI/Asset/Wobject/IndexedSearch.pm
View file

@ -29,14 +29,6 @@ sub definition {
fieldType=>"template",
defaultValue=>"PBtmpl0000000000000034"
},
linkURL=>{
fieldType=>'url',
defaultValue=>undef
},
linkTitle=>{
fieldType=>'text',
defaultValue=>undef
},
indexName=>{
fieldType=>'text',
defaultValue=>'default'