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

more guid stuff

Browse source
This commit is contained in:
JT Smith 2004-08-13 14:34:36 +00:00
parent c975503292
commit 01c69d5291
6 changed files with 33 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/WebGUI/Operation/MetaData.pm
View file

@ -13,16 +13,17 @@ package WebGUI::Operation::MetaData;
use Exporter;
use strict;
use Tie::IxHash;
use WebGUI::Icon;
use WebGUI::Id;
use WebGUI::International;
use WebGUI::Macro;
use WebGUI::MetaData;
use WebGUI::Operation::Shared;
use WebGUI::Privilege;
use WebGUI::Session;
use WebGUI::SQL;
use WebGUI::URL;
use WebGUI::Utility;
use WebGUI::Operation::Shared;
use WebGUI::Icon;
use WebGUI::Privilege;
use WebGUI::SQL;
use WebGUI::MetaData;
our @ISA = qw(Exporter);
our @EXPORT = qw(&www_editMetaDataField &www_manageMetaData &www_editMetaDataFieldSave &www_deleteMetaDataField
@ -109,7 +110,7 @@ sub www_editMetaDataFieldSave {
. www_editMetaDataField();
}
if($session{form}{fid} eq 'new') {
$session{form}{fid} = getNextId("metaData_fieldId");
$session{form}{fid} = WebGUI::Id::generate();
WebGUI::SQL->write("insert into metaData_properties (fieldId, fieldName, defaultValue, description, fieldType, possibleValues) values (".
quote($session{form}{fid}).",".
quote($session{form}{fieldName}).",".