From 0cd9e07fc7ba492179a08f0c5411578bf65111fa Mon Sep 17 00:00:00 2001 From: Andreas Brachold Date: Wed, 31 Oct 2007 14:41:26 +0000 Subject: * Fix some problems at user rights with guest account --- lib/XXV/MODULES/CONFIG.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/XXV/MODULES/CONFIG.pm b/lib/XXV/MODULES/CONFIG.pm index 3a59e4f..c2289dc 100644 --- a/lib/XXV/MODULES/CONFIG.pm +++ b/lib/XXV/MODULES/CONFIG.pm @@ -20,27 +20,30 @@ sub module { Date => (split(/ /, '$Date$'))[1], Author => 'xpix', LastAuthor => (split(/ /, '$Author$'))[1], - Level => 'admin', Commands => { configedit => { description => gettext("Edit configuration 'section'"), short => 'ce', callback => sub{ $obj->edit(@_) }, + Level => 'admin', }, configwrite => { description => gettext('Saves the configuration.'), short => 'cw', callback => sub{ $obj->write(@_) }, + Level => 'admin', }, configget => { description => gettext("Get configuration from 'modname'"), short => 'cg', callback => sub{ $obj->get(@_) }, + Level => 'admin', }, reconfigure => { description => gettext('Edit all processes'), short => 'cr', callback => sub{ $obj->reconfigure(@_) }, + Level => 'admin', }, help => { description => gettext("This will display all commands or description of module 'name'."), @@ -58,7 +61,7 @@ sub module { Module::Reload->check; $c->message(gettext("Modules loaded.")); }, - Level => 'admin' + Level => 'admin' }, }, }; -- cgit v1.2.3