version 1.116, 2005/10/27 23:13:49
|
version 1.118, 2005/11/15 20:46:40
|
Line 1387 sub course_select_row {
|
Line 1387 sub course_select_row {
|
</script> |
</script> |
|; |
|; |
my $courseform='<b>'.&Apache::loncommon::selectcourse_link |
my $courseform='<b>'.&Apache::loncommon::selectcourse_link |
($formname,'pickcourse','pickdomain','coursedesc').'</b>'; |
($formname,'pickcourse','pickdomain','coursedesc','',1).'</b>'; |
if ($totcodes > 0) { |
if ($totcodes > 0) { |
$output .= '<input type="radio" name="coursepick" value="all" onclick="coursePick(this.form)" />'.&mt('All courses'); |
$output .= '<input type="radio" name="coursepick" value="all" onclick="coursePick(this.form)" />'.&mt('All courses'); |
my $numtitles = @$codetitles; |
my $numtitles = @$codetitles; |
Line 1433 sub course_select_row {
|
Line 1433 sub course_select_row {
|
$output .= '</tr></table><br />'; |
$output .= '</tr></table><br />'; |
} |
} |
} |
} |
$output .= '<input type="radio" name="coursepick" value="specific" onclick="coursePick(this.form);opencrsbrowser('."'".'rolefilter'."'".','."'".'dccourse'."'".','."'".'dcdomain'."'".','."'".'coursedesc'."',''".')" />'.&mt('Pick specific course(s):').' '.$courseform.' <input type="text" value="0" size="4" name="coursetotal" /><input type="hidden" name="courselist" value="" />selected.<br /></td>'."\n"; |
$output .= '<input type="radio" name="coursepick" value="specific" onclick="coursePick(this.form);opencrsbrowser('."'".$formname."'".','."'".'dccourse'."'".','."'".'dcdomain'."'".','."'".'coursedesc'."','','1'".')" />'.&mt('Pick specific course(s):').' '.$courseform.' <input type="text" value="0" size="4" name="coursetotal" /><input type="hidden" name="courselist" value="" />selected.<br /></td>'."\n"; |
$output .= &row_closure(); |
$output .= &row_closure(); |
return $output; |
return $output; |
} |
} |
|
|
sub status_select_row { |
sub status_select_row { |
my ($types,$col_width,$tablecolor,$title) = @_; |
my ($types,$col_width,$tablecolor,$title) = @_; |
my $output = &row_title($col_width,$tablecolor,$title); |
my $output; |
|
if (defined($title)) { |
|
$output = &row_title($col_width,$tablecolor,$title); |
|
} |
$output .= qq| <td> |
$output .= qq| <td> |
<select name="types" multiple>\n|; |
<select name="types" multiple>\n|; |
foreach my $status_type (sort(keys(%{$types}))) { |
foreach my $status_type (sort(keys(%{$types}))) { |
Line 1448 sub status_select_row {
|
Line 1451 sub status_select_row {
|
} |
} |
$output .= qq| </select> |
$output .= qq| </select> |
</td>\n|; |
</td>\n|; |
$output .= &row_closure(); |
if (defined($title)) { |
|
$output .= &row_closure(); |
|
} |
return $output; |
return $output; |
} |
} |
|
|