'.&mt('None found').'
'); } elsif ($multiple) { - $r->print(''); + $r->print(''); } $r->print(''. "\n".''."\n". @@ -543,7 +543,7 @@ sub multiples_tag { sub build_filters { my ($filterlist,$type,$roleelement,$multelement,$filter,$action, - $numtitlesref,$caller,$cloneruname,$clonerudom,$typeelement) = @_; + $numtitlesref,$caller,$cloneruname,$clonerudom,$typeelement,$codetitlesref) = @_; my ($list,$formname,$fixeddom,$codedom,$jscript); $codedom = $env{'request.role.domain'}; if (defined($env{'form.form'})) { @@ -551,10 +551,7 @@ sub build_filters { } else { $formname = $caller; } - my $onchange; - unless ($env{'form.interface'} eq 'textual') { - $onchange = 'javascript:updateFilters(this)'; - } + my $onchange = 'javascript:updateFilters(this)'; my ($domainselectform,$sincefilterform,$createdfilterform, $ownerdomselectform,$persondomselectform,$instcodeform, $typeselectform,$instcodetitle); @@ -619,7 +616,6 @@ sub build_filters { } } - # last course activity filter and selection $sincefilterform = &timebased_select_form('sincefilter',$filter); @@ -630,7 +626,7 @@ sub build_filters { my %lt = &Apache::lonlocal::texthash( 'cac' => "$type Activity", - 'ccr' => "$type Created", + 'ccr' => "$type Created", 'cde' => "$type Title", 'cdo' => "$type Domain", 'ins' => 'Institutional Code', @@ -681,7 +677,7 @@ sub build_filters { || ($formname eq 'modifycourse')) { $officialjs = 1; ($instcodeform,$jscript,$$numtitlesref) = - &instcode_selectors($codedom,'filterpicker',$officialjs); + &instcode_selectors($codedom,'filterpicker',$officialjs,$codetitlesref); if ($jscript) { $jscript = ''."\n"; @@ -816,10 +812,10 @@ sub timebased_select_form { $filter->{$item} = $env{'form.'.$item}; $filter->{$item} =~ s/[^\d-]//g; if (!$filter->{$item}) { $filter->{$item}=-1; } - return &Apache::loncommon::select_form( + return &Apache::loncommon::select_form( $filter->{$item}, $item, - ( '-1' => '', + { '-1' => '', '86400' => &mt('today'), '604800' => &mt('last week'), '2592000' => &mt('last month'), @@ -828,13 +824,17 @@ sub timebased_select_form { '31104000' => &mt('last year'), 'select_form_order' => ['-1','86400','604800','2592000','7776000', - '15552000','31104000'])); + '15552000','31104000']}); } } sub get_coordinator_cloneable { my ($cloneruname,$clonerudom,$type) = @_; - if (&Apache::lonnet::homeserver($cloneruname,$clonerudom) eq 'no_host') { + if (($cloneruname!~/\w/) || ($clonerudom!~/\w/)) { + my $warning = '