Security check added for flush cache

This commit is contained in:
Len Kranendonk 2005-04-25 19:39:54 +00:00
parent d8ead51499
commit 8dc80f6e2d

View file

@ -33,6 +33,7 @@ sub _submenu {
#-------------------------------------------------------------------
sub www_flushCache {
return WebGUI::Privilege::adminOnly() unless (WebGUI::Grouping::isInGroup(3));
my $cache = WebGUI::Cache->new();
$cache->flush;
return www_manageCache();