Diff for /loncom/lond between versions 1.428 and 1.431

version 1.428, 2009/10/08 19:54:26 version 1.431, 2009/10/21 16:14:24
Line 3784  sub dump_course_id_handler { Line 3784  sub dump_course_id_handler {
             $cc_clone{$clonedom.'_'.$clonenum} = 1;              $cc_clone{$clonedom.'_'.$clonenum} = 1;
         }           } 
     }      }
     if (defined($createdbefore)) {      if ($createdbefore ne '') {
         $createdbefore = &unescape($createdbefore);          $createdbefore = &unescape($createdbefore);
     } else {      } else {
        $createdbefore = 0;         $createdbefore = 0;
     }      }
     if (defined($createdafter)) {      if ($createdafter ne '') {
         $createdafter = &unescape($createdafter);          $createdafter = &unescape($createdafter);
     } else {      } else {
         $createdafter = 0;          $createdafter = 0;
     }      }
     if (defined($creationcontext)) {      if ($creationcontext ne '') {
         $creationcontext = &unescape($creationcontext);          $creationcontext = &unescape($creationcontext);
     } else {      } else {
         $creationcontext = '.';          $creationcontext = '.';
Line 3826  sub dump_course_id_handler { Line 3826  sub dump_course_id_handler {
             my ($canclone,$valchange);              my ($canclone,$valchange);
             my $items = &Apache::lonnet::thaw_unescape($value);              my $items = &Apache::lonnet::thaw_unescape($value);
             if (ref($items) eq 'HASH') {              if (ref($items) eq 'HASH') {
                   if ($hashref->{$lasttime_key} eq '') {
                       next if ($since > 1);
                   }
                 $is_hash =  1;                  $is_hash =  1;
                 if (defined($clonerudom)) {                  if (defined($clonerudom)) {
                     if ($items->{'cloners'}) {                      if ($items->{'cloners'}) {

Removed from v.1.428  
changed lines
  Added in v.1.431


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>