version 1.3, 2003/07/09 10:05:15
|
version 1.4, 2003/07/16 15:19:56
|
Line 210 ENDDOCUMENT
|
Line 210 ENDDOCUMENT
|
$qtype=$qparms{$prefix.'questiontype'}; |
$qtype=$qparms{$prefix.'questiontype'}; |
unless (defined($qtype)) { $qtype='radio'; } |
unless (defined($qtype)) { $qtype='radio'; } |
unless ($questiontypes{$qtype}) { $qtype='radio'; } |
unless ($questiontypes{$qtype}) { $qtype='radio'; } |
$r->print('Question Type: '.&Apache::loncommon::select_form |
$r->print('<b>Question Type: '.&Apache::loncommon::select_form |
($qtype,'questiontype',%questiontypes). |
($qtype,'questiontype',%questiontypes). |
'<p> </p>'); |
'</b><br /><input type="submit" value="Store Changes" /><p> </p>'); |
# Question Text |
# Question Text |
$r->print(&questiontext()); |
$r->print(&questiontext()); |
# Radio, Option === |
# Radio, Option === |
Line 281 ENDDOCUMENT
|
Line 281 ENDDOCUMENT
|
} |
} |
# Store Button |
# Store Button |
$r->print( |
$r->print( |
'<input type="submit" name="storeproblem" value="Store Changes" /></form>'); |
'<input type="submit" value="Store Changes" /></form>'); |
} else { |
} else { |
$r->print('Could not identify problem.'); |
$r->print('Could not identify problem.'); |
} |
} |