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

[albertel]

albertel		Thu May 11 19:54:11 2006 EDT

  Modified files:              
    /rat	lonuserstate.pm 
  Log:
  - making map_start map_finish_ map_pc_ entires contain a versioned url (the same thing src_ has)
  
  
Index: rat/lonuserstate.pm
diff -u rat/lonuserstate.pm:1.109 rat/lonuserstate.pm:1.110
--- rat/lonuserstate.pm:1.109	Fri May  5 11:50:20 2006
+++ rat/lonuserstate.pm	Thu May 11 19:54:06 2006
@@ -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.109 2006/05/05 15:50:20 albertel Exp $
+# $Id: lonuserstate.pm,v 1.110 2006/05/11 23:54:06 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -592,8 +592,14 @@
 	}
 # ------------------------------------------------------- Put versions into src
 	foreach my $key (keys(%hash)) {
-	    if ($key=~/^src\_/) {
+	    if ($key=~/^src_/) {
 		$hash{$key}=&putinversion($hash{$key});
+	    } elsif ($key =~ /^(map_(?:start|finish|pc)_)(.*)/) {
+		&Apache::lonnet::logthis($key);
+		my ($type, $url) = ($1,$2);
+		my $value = $hash{$key};
+		delete($hash{$key});
+		$hash{$type.&putinversion($url)}=$value;
 	    }
 	}
 # ---------------------------------------------------------------- Encrypt URLs