--- loncom/homework/lonhomework.pm 2014/01/10 17:03:30 1.341
+++ loncom/homework/lonhomework.pm 2014/08/07 19:53:19 1.345
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Homework handler
#
-# $Id: lonhomework.pm,v 1.341 2014/01/10 17:03:30 bisitz Exp $
+# $Id: lonhomework.pm,v 1.345 2014/08/07 19:53:19 musolffc Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -451,13 +451,14 @@ sub check_access {
$datemsg=$date;
} elsif ($type eq 'opendate') {
$status='CLOSED';
- $datemsg = &mt("will open on")." $date";
+ $datemsg = &mt('will open on [_1]',$date);
} elsif ($type eq 'duedate') {
$status='CAN_ANSWER';
- $datemsg = &mt("is due at")." $date";
+ $datemsg = &mt('is due at [_1]',$date);
} elsif ($type eq 'answerdate') {
$status='CLOSED';
- $datemsg = &mt("was due on")." $lastdate".&mt(", and answers will be available on")." $date";
+ $datemsg = &mt('was due on [_1], and answers will be available on [_2]',
+ $lastdate,$date);
}
}
if ($status eq 'CAN_ANSWER' ||
@@ -540,7 +541,7 @@ sub due_date {
} else {
$date = $due_date;
}
- return $date
+ return $date;
}
sub seconds_to_human_length {
@@ -1130,7 +1131,7 @@ sub get_template_list {
'/templates/*.'.$glob_extension);
@files = map {[$_,&mt(&Apache::lonnet::metadata($_, 'title')),
(&Apache::lonnet::metadata($_, 'category')?&mt(&Apache::lonnet::metadata($_, 'category')):&mt('Miscellaneous')),
- &mt(&Apache::lonnet::metadata($_, 'help'))]} (@files);
+ &Apache::lonnet::metadata($_, 'help')]} (@files);
@files = sort {$a->[2].$a->[1] cmp $b->[2].$b->[1]} (@files);
my ($midpoint,$seconddiv,$numfiles);
my @noexamplelink = ('blank.problem','blank.library','script.library');
@@ -1175,12 +1176,12 @@ sub get_template_list {
# Provide example link
my $filename=$file->[0];
$filename=~s{^\Q$londocroot\E}{};
- if (!(grep $filename =~ $_, @noexamplelink)) {
- $result .= ' '
- .&Apache::loncommon::modal_link(
- $filename.'?inhibitmenu=yes',&mt('Example'),600,420,'sample')
- .'';
- };
+ if (!(grep($filename =~ /\Q$_\E$/,@noexamplelink))) {
+ $result .= ' '
+ .&Apache::loncommon::modal_link(
+ $filename.'?inhibitmenu=yes',&mt('Example'),600,420,'sample')
+ .'';
+ }
$result .= '
'."\n";
$count ++;
}