[LON-CAPA-cvs] cvs: loncom /auth lonacc.pm

[www]

www		Tue Mar 26 11:05:01 2002 EDT

  Modified files:              
    /loncom/auth	lonacc.pm 
  Log:
  Accepts symb now
  
  
Index: loncom/auth/lonacc.pm
diff -u loncom/auth/lonacc.pm:1.28 loncom/auth/lonacc.pm:1.29
--- loncom/auth/lonacc.pm:1.28	Tue Feb 26 16:01:33 2002
+++ loncom/auth/lonacc.pm	Tue Mar 26 11:05:01 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Cookie Based Access Handler
 #
-# $Id: lonacc.pm,v 1.28 2002/02/26 21:01:33 albertel Exp $
+# $Id: lonacc.pm,v 1.29 2002/03/26 16:05:01 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -172,7 +172,16 @@
             $requrl=~/\.(\w+)$/;
             if (&Apache::loncommon::fileembstyle($1) eq 'ssi') {
 # ------------------------------------- This is serious stuff, get symb and log
-		my $symb=&Apache::lonnet::symbread;
+		my $query=$r->args;
+                my $symb;
+                if ($query) {
+		    &Apache::loncommon::get_unprocessed_cgi($query,['symb']);
+                }
+                if ($ENV{'form.symb'}) {
+		    $symb=$ENV{'form.symb'};
+                } else {
+	            $symb=&Apache::lonnet::symbread;
+                }
                 $ENV{'request.symb'}=$symb;
                 &Apache::lonnet::courseacclog($symb);
             } else {