loncom/interface/lonrequestcourse.pm - diff

Return to lonrequestcourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.81, 2014/05/09 15:02:31	version 1.82, 2014/05/09 17:43:13
Line 4543 sub print_textbook_form {	Line 4543 sub print_textbook_form {
}	}
$r->print('<th>'.&mt('Subject').'</th>');	$r->print('<th>'.&mt('Subject').'</th>');
if ($type eq 'textbooks') {	if ($type eq 'textbooks') {
$r->print('<th>'.&mt('Book').'</th>');	$r->print('<th>'.&mt('Publisher').'</th>'.
	'<th>'.&mt('Book').'</th>');
}	}
$r->print(&Apache::loncommon::end_data_table_header_row());	$r->print(&Apache::loncommon::end_data_table_header_row());
my @items = sort { $a <=> $b } keys(%{$ordered{$type}});	my @items = sort { $a <=> $b } keys(%{$ordered{$type}});
Line 4560 sub print_textbook_form {	Line 4561 sub print_textbook_form {
}	}
$r->print('<td>'.$prefab{$type}{$item}{'subject'}.'</td>');	$r->print('<td>'.$prefab{$type}{$item}{'subject'}.'</td>');
if ($type eq 'textbooks') {	if ($type eq 'textbooks') {
$r->print('<td><img border="0" src="'.$prefab{$type}{$item}{'image'}.	$r->print('<td>'.$prefab{$type}{$item}{'publisher'}.'</td>'.
	'<td><img border="0" src="'.$prefab{$type}{$item}{'image'}.
'" alt="'.$cleantitle.'" /></td>');	'" alt="'.$cleantitle.'" /></td>');
}	}
$r->print(&Apache::loncommon::end_data_table_row());	$r->print(&Apache::loncommon::end_data_table_row());