--- loncom/cgi/clusterstatus.pl	2008/11/29 00:57:09	1.25
+++ loncom/cgi/clusterstatus.pl	2008/12/25 01:56:03	1.26
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 $|=1;
 # Generates a html page showing various status reports about the domain or cluster
-# $Id: clusterstatus.pl,v 1.25 2008/11/29 00:57:09 raeburn Exp $
+# $Id: clusterstatus.pl,v 1.26 2008/12/25 01:56:03 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -33,6 +33,7 @@ use Apache::lonnet;
 use Apache::lonlocal;
 use LONCAPA::Configuration;
 use LONCAPA::loncgi;
+use LONCAPA::lonauthcgi;
 use LWP::UserAgent();
 use HTTP::Headers;
 use IO::File;
@@ -726,9 +727,9 @@ if (!&LONCAPA::loncgi::check_cookie_and_
     exit;
 }
 
-if (!&LONCAPA::loncgi::can_view('clusterstatus')) {
+if (!&LONCAPA::lonauthcgi::can_view('clusterstatus')) {
     &Apache::lonlocal::get_language_handle();
-    print &LONCAPA::loncgi::unauthorized_msg('clusterstatus');
+    print &LONCAPA::lonauthcgi::unauthorized_msg('clusterstatus');
     exit;
 }