--- loncom/auth/lonstatusacc.pm	2008/11/28 19:38:11	1.1
+++ loncom/auth/lonstatusacc.pm	2008/11/30 14:47:11	1.2
@@ -1,7 +1,7 @@
 #
 # LON-CAPA authorization for pages generated by server-status reports 
 #
-# $Id: lonstatusacc.pm,v 1.1 2008/11/28 19:38:11 raeburn Exp $
+# $Id: lonstatusacc.pm,v 1.2 2008/11/30 14:47:11 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -41,7 +41,7 @@ sub handler {
     my $page = 'serverstatus';
     if ($r->uri eq '/adm/test') {
         $page = 'showenv';
-        if (&LONCAPA::loncgi::check_cookie_and_load_env()) {
+        if (&LONCAPA::loncgi::check_cookie_and_load_env($r)) {
             if (&LONCAPA::loncgi::can_view($page)) {
                 return OK; 
             } elsif (&LONCAPA::loncgi::check_ipbased_access($page,$reqhost)) {
@@ -73,7 +73,7 @@ sub handler {
     } elsif (&LONCAPA::loncgi::check_ipbased_access($page,$reqhost)) {
         return OK;
     } else {
-        if (&LONCAPA::loncgi::check_cookie_and_load_env($page)) {
+        if (&LONCAPA::loncgi::check_cookie_and_load_env($r)) {
             if (&LONCAPA::loncgi::can_view($page)) {
                 return OK;
             }