Let officers see all members

[ndwebbie.git] / NDWeb / Pages / Settings.pm

diff --git a/NDWeb/Pages/Settings.pm b/NDWeb/Pages/Settings.pm
index 75c55403096492931ca1fb2c1fe6343aa3c83cd4..962035e6709360168f1a812e1c1d24d660a71246 100644 (file)
--- a/NDWeb/Pages/Settings.pm
+++ b/NDWeb/Pages/Settings.pm
@@ -17,16 +17,16 @@
 #   51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.         *
 #**************************************************************************/
 
-package ND::Web::Pages::Settings;
+package NDWeb::Pages::Settings;
 use strict;
 use warnings FATAL => 'all';
 use ND::Include;
 use CGI qw/:standard/;
-use ND::Web::Include;
+use NDWeb::Include;
 
-use base qw/ND::Web::XMLPage/;
+use base qw/NDWeb::XMLPage/;
 
-$ND::Web::Page::PAGES{settings} = __PACKAGE__;
+$NDWeb::Page::PAGES{settings} = __PACKAGE__;
 
 sub render_body {
        my $self = shift;
@@ -47,7 +47,7 @@ sub render_body {
        my ($css) = $DBH->selectrow_array(q{SELECT css FROM users WHERE uid = $1},undef,$ND::UID);
        my @stylesheets = ({Style => 'Default'});
        $css = '' unless defined $css;
-       while (<stylesheets/*.css>){
+       while (<htdocs/stylesheets/*.css>){
                if(m{stylesheets/(\w+)\.css}){
                        push @stylesheets,{Style => $1, Selected => $1 eq $css ? 1 : 0};
                }