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'}) { |