[LON-CAPA-cvs] cvs: rat / lonuserstate.pm

[www]

www		Sat Mar  1 20:43:01 2003 EDT

  Modified files:              
    /rat	lonuserstate.pm 
  Log:
  declutter earlier to also remove query strings.
  
  
Index: rat/lonuserstate.pm
diff -u rat/lonuserstate.pm:1.54 rat/lonuserstate.pm:1.55
--- rat/lonuserstate.pm:1.54	Sat Mar  1 10:13:59 2003
+++ rat/lonuserstate.pm	Sat Mar  1 20:43:01 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construct and maintain state and binary representation of course for user
 #
-# $Id: lonuserstate.pm,v 1.54 2003/03/01 15:13:59 www Exp $
+# $Id: lonuserstate.pm,v 1.55 2003/03/02 01:43:01 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -377,11 +377,11 @@
 	    my $resid=$_;
             my $uri=$hash{'src_'.$resid};
             $uri=~s/^\/adm\/wrapper//;
+            $uri=&Apache::lonnet::declutter($uri);
             my @uriparts=split(/\//,$uri);
             my $urifile=$uriparts[$#uriparts];
             $#uriparts--;
             my $uripath=join('/',@uriparts);
-            $uripath=&Apache::lonnet::declutter($uripath);
            if ($uripath) {
             my $uricond='0';
             if (defined($hash{'conditions_'.$resid})) {