[LON-CAPA-cvs] cvs: loncom /cgi userstatus.pl

[raeburn]

raeburn		Fri Jan  9 07:06:27 2009 EDT

  Modified files:              
    /loncom/cgi	userstatus.pl 
  Log:
  - Missing $page arg to &check_ipbased_access().
  
  
Index: loncom/cgi/userstatus.pl
diff -u loncom/cgi/userstatus.pl:1.18 loncom/cgi/userstatus.pl:1.19
--- loncom/cgi/userstatus.pl:1.18	Thu Dec 25 01:56:03 2008
+++ loncom/cgi/userstatus.pl	Fri Jan  9 07:06:27 2009
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 $|=1;
 # User Status
-# $Id: userstatus.pl,v 1.18 2008/12/25 01:56:03 raeburn Exp $
+# $Id: userstatus.pl,v 1.19 2009/01/09 07:06:27 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -73,7 +73,7 @@
     delete $$perlvar{'lonReceipt'}; # remove since sensitive and not needed
     delete $$perlvar{'lonSqlAccess'}; # remove since sensitive and not needed
 
-    if (!&LONCAPA::lonauthcgi::check_ipbased_access()) {
+    if (!&LONCAPA::lonauthcgi::check_ipbased_access('userstatus')) {
         if (!&LONCAPA::loncgi::check_cookie_and_load_env()) {
             &Apache::lonlocal::get_language_handle();
             print &LONCAPA::loncgi::missing_cookie_msg();