Converted users to catalyst

[ndwebbie.git] / lib / NDWeb.pm

diff --git a/lib/NDWeb.pm b/lib/NDWeb.pm
index 85bbf831de6fd811d83c6d571e07e635e8900e79..8cc8388798f1d2dec3b48f1d2fd483be1b41c890 100644 (file)
--- a/lib/NDWeb.pm
+++ b/lib/NDWeb.pm
@@ -5,6 +5,10 @@ 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
@@ -49,6 +53,8 @@ __PACKAGE__->setup(qw/
        Session::State::Cookie
        /);
 
+__PACKAGE__->deny_access_unless('/users',[qw/admin_users/]);
+
 =head1 NAME
 
 NDWeb - Catalyst based application