Converted def leeches

[ndwebbie.git] / lib / NDWeb.pm

diff --git a/lib/NDWeb.pm b/lib/NDWeb.pm
index 7507a2fd568cc8343a105c36460bca298fad3821..d2f151763f6a3067bcb0e76574c75af01d071215 100644 (file)
--- a/lib/NDWeb.pm
+++ b/lib/NDWeb.pm
@@ -5,10 +5,6 @@ use warnings;
 
 use Catalyst::Runtime '5.70';
 
-#Need to preload, otherwise the first hit is slow
-use CGI qw/:standard/;
-escapeHTML('');
-
 # Set flags and add plugins for the application
 #
 #         -Debug: activates the debug mode for very useful log messages
@@ -75,6 +71,19 @@ __PACKAGE__->deny_access_unless('/users',[qw/admin_users/]);
 __PACKAGE__->deny_access_unless('/alliances/resources',[qw/alliances_resources/]);
 __PACKAGE__->deny_access_unless('/graphs/alliancevsintel',[qw/graphs_intel/]);
 __PACKAGE__->deny_access_unless('/graphs/avgalliancevsintel',[qw/graphs_intel/]);
+__PACKAGE__->deny_access_unless('/members',[qw/members/]);
+__PACKAGE__->deny_access_unless('/covop',[qw/covop/]);
+__PACKAGE__->deny_access_unless('/calls/list',[qw/calls_list/]);
+__PACKAGE__->deny_access_unless('/calls/postcallcomment',[qw/calls_edit/]);
+__PACKAGE__->deny_access_unless('/calls/postcallupdate',[qw/calls_edit/]);
+__PACKAGE__->deny_access_unless('/calls/postattackerupdate',[qw/calls_edit/]);
+__PACKAGE__->deny_access_unless('/calls/defleeches',[qw/calls_leeches/]);
+__PACKAGE__->deny_access_unless('/raids',[qw/raids_edit/]);
+__PACKAGE__->allow_access_if('/raids/index',1);
+__PACKAGE__->allow_access_if('/raids/view',1);
+__PACKAGE__->allow_access_if('/raids/findRaid',1);
+__PACKAGE__->allow_access_if('/raids/log',1);
+__PACKAGE__->deny_access_unless('/intel',[qw/intel/]);
 
 =head1 NAME