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

[albertel]

albertel		Mon May  8 14:50:27 2006 EDT

  Modified files:              
    /loncom/interface	lonpreferences.pm 
  Log:
  - add a timestamp to the color pref
  
  
Index: loncom/interface/lonpreferences.pm
diff -u loncom/interface/lonpreferences.pm:1.83 loncom/interface/lonpreferences.pm:1.84
--- loncom/interface/lonpreferences.pm:1.83	Mon May  1 18:54:43 2006
+++ loncom/interface/lonpreferences.pm	Mon May  8 14:50:27 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Preferences
 #
-# $Id: lonpreferences.pm,v 1.83 2006/05/01 22:54:43 albertel Exp $
+# $Id: lonpreferences.pm,v 1.84 2006/05/08 18:50:27 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -600,6 +600,10 @@
 	    $message.='Reset '.$colortypes{$item}.'<br />';
 	}
     }
+    my $now = time;
+    &Apache::lonnet::put('environment',{'color.timestamp' => $now});
+    &Apache::lonnet::appenv('environment.color.timestamp' => $now);
+
     $r->print(<<ENDVCCOL);
 $message
 <form name="client" action="/adm/preferences" method="POST">