loncom/interface/statistics/lonstathelpers.pm - diff

Return to lonstathelpers.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.46, 2005/04/07 06:56:24	version 1.49, 2005/04/08 13:35:50
Line 338 sub new_accumulator {	Line 338 sub new_accumulator {
sub get_selected_symbs {	sub get_selected_symbs {
my ($inputfield) = @_;	my ($inputfield) = @_;
my $field = 'form.'.$inputfield;	my $field = 'form.'.$inputfield;
my @Symbs;	my @symbs = (map {
if (exists($env{$field})) {	&Apache::lonnet::unescape($_);
if (! ref($env{$field})) {	} &Apache::loncommon::get_env_multiple($field));
@Symbs = (&Apache::lonnet::unescape($env{$field}));	return @symbs;
} else {
@Symbs = (map {&Apache::lonnet::unescape($_);} @{$env{$field}});
}
}
return @Symbs;
}	}

####################################################	####################################################
Line 1257 sub limit_by_time_form {	Line 1252 sub limit_by_time_form {
}	}
$timecheckbox .= 'OnChange="javascript:toggle_limitby_activity(this.checked);" ';	$timecheckbox .= 'OnChange="javascript:toggle_limitby_activity(this.checked);" ';
$timecheckbox .= ' />';	$timecheckbox .= ' />';
$Str .= '<legend>'.&mt('[_1] Limit by time',$timecheckbox).'</legend>';	$Str .= '<legend><label>'.&mt('[_1] Limit by time',$timecheckbox).'</label></legend>';
$Str .= &mt('Start Time: [_1]',$startdateform).'<br />';	$Str .= &mt('Start Time: [_1]',$startdateform).'<br />';
$Str .= &mt(' End Time: [_1]',$enddateform).'<br />';	$Str .= &mt(' End Time: [_1]',$enddateform).'<br />';
$Str .= '</fieldset>';	$Str .= '</fieldset>';