version 1.31, 2005/10/04 00:27:22
|
version 1.32, 2005/10/14 18:23:32
|
Line 305 ENDSCRIPT
|
Line 305 ENDSCRIPT
|
unless ($owner eq '') { |
unless ($owner eq '') { |
$r->print(", owner - ".&Apache::lonnet::unescape($owner)); |
$r->print(", owner - ".&Apache::lonnet::unescape($owner)); |
} |
} |
|
if ($multflag) { $r->print("</label>\n"); } |
$r->print("<br />\n"); |
$r->print("<br />\n"); |
} |
} |
} |
} |
Line 327 sub course_chooser {
|
Line 328 sub course_chooser {
|
my ($multflag,$cdom,$cnum,$cleandesc) = @_; |
my ($multflag,$cdom,$cnum,$cleandesc) = @_; |
my $output; |
my $output; |
if ($multflag) { |
if ($multflag) { |
$output = '<input type="checkbox" name="course_id" value="'.$cdom.'_'.$cnum.'" />'."\n"; |
$output = '<label><input type="checkbox" name="course_id" value="'.$cdom.'_'.$cnum.'" />'."\n"; |
} else { |
} else { |
$output = '<input type="button" value="Select" onClick="gochoose('. |
$output = '<input type="button" value="Select" onClick="gochoose('. |
"'".$cnum."','".$cdom."','".$cleandesc."')".'" />'."\n"; |
"'".$cnum."','".$cdom."','".$cleandesc."')".'" />'."\n"; |