[LON-CAPA-cvs] cvs: loncom /interface lonparmset.pm

www lon-capa-cvs@mail.lon-capa.org
Sat, 17 Aug 2002 20:04:18 -0000


www		Sat Aug 17 16:04:18 2002 EDT

  Modified files:              
    /loncom/interface	lonparmset.pm 
  Log:
  Between versions 1.44 and 1.45 the timestamp had gotten lost on the
  backed up course URL. Even though this looks ugly, for data recovery,
  all previous versions and the timestamp are important. People should
  not get into the habit of changing course URLs anyway. The new "uploaded"
  coursedocs-based mechanism should make changing welcome pages, etc, easier,
  anyway.
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.61 loncom/interface/lonparmset.pm:1.62
--- loncom/interface/lonparmset.pm:1.61	Fri Aug 16 16:47:26 2002
+++ loncom/interface/lonparmset.pm	Sat Aug 17 16:04:18 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.61 2002/08/16 20:47:26 albertel Exp $
+# $Id: lonparmset.pm,v 1.62 2002/08/17 20:04:18 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1233,12 +1233,13 @@
             }
             if ($name eq 'url') {
 		$value=~s/^\/res\///;
+                my $bkuptime=time;
                 my @tmp = &Apache::lonnet::get
                     ('environment',['url'],$dom,$crs);
                 $setoutput.='Backing up previous URL: '.
                     &Apache::lonnet::put
                         ('environment',
-                         {'top level map backup ' => $tmp[1] },
+                         {'top level map backup '.$bkuptime => $tmp[1] },
                          $dom,$crs).
                     '<br>';
             }