loncom/interface/portfolio.pm - diff

Return to portfolio.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.242, 2013/04/24 02:23:51	version 1.244, 2013/04/30 14:27:51
Line 640 sub display_file {	Line 640 sub display_file {

sub done {	sub done {
my ($linktext,$url)=@_;	my ($linktext,$url)=@_;
unless (defined $linktext) {	unless (defined($linktext)) {
$linktext='Return to directory';	$linktext='Return to directory';
}	}
my %anchor_fields = (	my %anchor_fields = (
Line 1219 sub update_access {	Line 1219 sub update_access {
$totalnew = $lastitem;	$totalnew = $lastitem;
my @numbers;	my @numbers;
for (my $i=$firstitem; $i<$lastitem; $i++) {	for (my $i=$firstitem; $i<$lastitem; $i++) {
push (@numbers,$i);	push(@numbers,$i);
}	}
&display_access_row($r,$status,$newitem,\@numbers,	&display_access_row($r,$status,$newitem,\@numbers,
$access_controls{$file_name},$now,$then);	$access_controls{$file_name},$now,$then);
Line 2708 sub handler {	Line 2708 sub handler {
$r->print(	$r->print(
'<p><span class="LC_warning">'	'<p><span class="LC_warning">'
.&mt('No file was selected to upload.')	.&mt('No file was selected to upload.')
.'</span><<br />'	.'</span><br />'
.&mt('To upload a file, click [_1]Browse...[_2] and select a file, then click [_1]Upload[_2].'	.&mt('To upload a file, click [_1]Browse...[_2] and select a file, then click [_1]Upload[_2].'
,'<strong>','</strong>')	,'<strong>','</strong>')
.'</p>'	.'</p>'