[LON-CAPA-cvs] cvs: loncom(GCI_3) /interface loncommon.pm

[raeburn]

raeburn		Wed Jan  6 22:53:59 2010 EDT

  Modified files:              (Branch: GCI_3)
    /loncom/interface	loncommon.pm 
  Log:
  - Customization for GCI_3.
    - Separator between start and end for values for user.role keys is a '.' .
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.925.2.6 loncom/interface/loncommon.pm:1.925.2.7
--- loncom/interface/loncommon.pm:1.925.2.6	Wed Jan  6 18:17:30 2010
+++ loncom/interface/loncommon.pm	Wed Jan  6 22:53:58 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.925.2.6 2010/01/06 18:17:30 raeburn Exp $
+# $Id: loncommon.pm,v 1.925.2.7 2010/01/06 22:53:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -10797,7 +10797,7 @@
         } else {
             next;
         }
-        my ($tstart,$tend) = split(':',$env{$envkey});
+        my ($tstart,$tend) = split('.',$env{$envkey});
         if (((!$tstart) || ($tstart < $now)) && ((!$tend) || ($tend > $now))) {
             my $descr = $env{'course.'.$cdom.'_'.$cnum.'.description'};
             if ($descr ne '') {