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

changed name saveSettings to saveMetaDataSettings because it was already used

Browse source
This commit is contained in:
Len Kranendonk 2004-07-26 07:51:37 +00:00
parent 1143651305
commit 1ba29d7d85
1 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -26,7 +26,7 @@ use WebGUI::MetaData;
our @ISA = qw(Exporter); our @ISA = qw(Exporter);
our @EXPORT = qw(&www_editMetaDataField &www_manageMetaData &www_editMetaDataFieldSave &www_deleteMetaDataField our @EXPORT = qw(&www_editMetaDataField &www_manageMetaData &www_editMetaDataFieldSave &www_deleteMetaDataField
&www_deleteMetaDataFieldConfirm &www_saveSettings); &www_deleteMetaDataFieldConfirm &www_saveMetaDataSettings);
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub _submenu { sub _submenu {
@ -41,7 +41,7 @@ sub _submenu {
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub www_saveSettings { sub www_saveMetaDataSettings {
return WebGUI::Privilege::adminOnly() unless (WebGUI::Grouping::isInGroup(3)); return WebGUI::Privilege::adminOnly() unless (WebGUI::Grouping::isInGroup(3));
WebGUI::SQL->write("update settings set value=".quote($session{form}{metaDataEnabled})." where name='metaDataEnabled'"); WebGUI::SQL->write("update settings set value=".quote($session{form}{metaDataEnabled})." where name='metaDataEnabled'");
WebGUI::SQL->write("update settings set value=".quote($session{form}{passiveProfilingEnabled})." where name='passiveProfilingEnabled'"); WebGUI::SQL->write("update settings set value=".quote($session{form}{passiveProfilingEnabled})." where name='passiveProfilingEnabled'");
@ -161,11 +161,10 @@ sub www_deleteMetaDataFieldConfirm {
sub www_manageMetaData { sub www_manageMetaData {
return WebGUI::Privilege::adminOnly() unless (WebGUI::Grouping::isInGroup(3)); return WebGUI::Privilege::adminOnly() unless (WebGUI::Grouping::isInGroup(3));
my $output; my $output;
# TODO: add help
$output = helpIcon('metadata manage'); $output = helpIcon('metadata manage');
$output .= '<h1>'.WebGUI::International::get('Manage Metadata','MetaData').'</h1>'; $output .= '<h1>'.WebGUI::International::get('Manage Metadata','MetaData').'</h1>';
my $f = new WebGUI::HTMLForm; my $f = new WebGUI::HTMLForm;
$f->hidden("op","saveSettings"); $f->hidden("op","saveMetaDataSettings");
$f->yesNo( $f->yesNo(
-name=>"metaDataEnabled", -name=>"metaDataEnabled",
-label=>WebGUI::International::get("Enable Metadata ?", 'MetaData'), -label=>WebGUI::International::get("Enable Metadata ?", 'MetaData'),