[LON-CAPA-cvs] cvs: loncom /homework structuretags.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 19 Sep 2003 21:38:15 -0000
albertel Fri Sep 19 17:38:15 2003 EDT
Modified files:
/loncom/homework structuretags.pm
Log:
- I think this is the last of the localization for structuretags.pm
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.210 loncom/homework/structuretags.pm:1.211
--- loncom/homework/structuretags.pm:1.210 Fri Sep 19 16:29:29 2003
+++ loncom/homework/structuretags.pm Fri Sep 19 17:38:15 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.210 2003/09/19 20:29:29 albertel Exp $
+# $Id: structuretags.pm,v 1.211 2003/09/19 21:38:15 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -115,7 +115,7 @@
&Apache::lonxml::whichuser();
if ($symb eq '' && !$publicuser) {
my $help = &Apache::loncommon::help_open_topic("Ambiguous_Reference");
- $help="Browsing resource, all submissions are temporary.<br />";
+ $help=&mt("Browsing resource, all submissions are temporary.")."<br />";
$body_tag_start.=$help;
}
}
@@ -262,17 +262,21 @@
}
sub checkout_msg {
+ my %lt=&Apache::lonlocal::texthash(
+ 'resource'=>'The resource needs to be checked out',
+ 'id_expln'=>'As a resource gets checked out, a unique timestamped ID is given to it, and a permanent record is left in the system.',
+ 'warning'=>'Checking out resources is subject to course policies, and may exclude future credit even if done erroneously.',
+ 'checkout'=>'Check out Exam for Viewing',
+ 'checkout?'=>'Check out Exam?');
return (<<ENDCHECKOUT);
-<h2>The resource needs to be checked out</h2>
-As a resource gets checked out, a unique timestamped ID is given to it, and a
-permanent record is left in the system.<p />
-<font color=red>
-Checking out resources is subject to course policies, and may exclude future
-credit even if done erroneously.<p />
+<h2>$lt{'resource'}</h2>
+ <p>$lt{'id_expln'}</p>
+<font color="red">
+<p>$lt{'warning'}</p>
</font>
<form name="checkout" method="POST" action="$ENV{'request.uri'}">
<input type="hidden" name="doescheckout" value="yes" />
-<input type="button" name="checkoutbutton" value="Check out Exam for Viewing" onClick="javascript:if (confirm('Check out Exam?')) { document.checkout.submit(); }" />
+<input type="button" name="checkoutbutton" value="$lt{'checkout'}" onClick="javascript:if (confirm('$lt{'checkout?'}')) { document.checkout.submit(); }" />
</form>
ENDCHECKOUT
}
@@ -383,7 +387,7 @@
$form_tag_start.='<input type="hidden" name="rndseed" value="'.
$rndseed.'" />'.
'<input type="submit" name="resetdata"
- value="New Problem Variation" />'.
+ value="'.&mt('New Problem Variation').'" />'.
'<input type="hidden" name="username"
value="'.$ENV{'form.username'}.'" /> <br />';
}
@@ -402,9 +406,9 @@
$result.= $head_tag_start.'</head>';
my $msg=$body_tag_start;
if ($status eq 'UNAVAILABLE') {
- $result.='<h1>Unable to determine if this resource is open due to network problems. Please try again later.</h1>';
+ $result.='<h1>'.&mt('Unable to determine if this resource is open due to network problems. Please try again later.').'</h1>';
} else {
- $result.='<h1>Not open to be viewed</h1>';
+ $result.='<h1>'.&mt('Not open to be viewed').'</h1>';
}
if ($status eq 'CLOSED') {
$msg.='The problem '.$accessmsg;
@@ -415,9 +419,9 @@
} elsif ($target eq 'tex') {
$result.='\begin{document}\noindent \vskip 1 mm \begin{minipage}{\textwidth}\vskip 0 mm';
if ($status eq 'UNAVAILABLE') {
- $result.='Unable to determine if this resource is open due to network problems. Please try again later.\vskip 0 mm ';
+ $result.=&mt('Unable to determine if this resource is open due to network problems. Please try again later.').'\vskip 0 mm ';
} else {
- $result.="Problem is not open to be viewed. It $accessmsg \\vskip 0 mm ";
+ $result.=&mt('Problem is not open to be viewed. It')." $accessmsg \\vskip 0 mm ";
}
}
} elsif ($target eq 'web') {
@@ -724,9 +728,9 @@
$result='';
} elsif ($target eq 'edit') {
$result .=&Apache::edit::tag_start($target,$token);
- $result .=&Apache::edit::text_arg('Include Language:','include',
+ $result .=&Apache::edit::text_arg(&mt('Include Language:'),'include',
$token,40);
- $result .=&Apache::edit::text_arg('Exclude Language:','exclude',
+ $result .=&Apache::edit::text_arg(&mt('Exclude Language:'),'exclude',
$token,40);
$result .=&Apache::edit::end_row().&Apache::edit::start_spanning_row();
} elsif ($target eq 'modified') {
@@ -799,7 +803,7 @@
}
} elsif ($target eq 'edit') {
$result .=&Apache::edit::tag_start($target,$token);
- $result .=&Apache::edit::text_arg('Test Condition:','condition',
+ $result .=&Apache::edit::text_arg(&mt('Test Condition:'),'condition',
$token,40);
$result .=&Apache::edit::end_row().&Apache::edit::start_spanning_row();
} elsif ($target eq 'modified') {
@@ -831,7 +835,7 @@
$return = &Apache::run::run($code,$safeeval);
}
if ($error) {
- &Apache::lonxml::error('<pre>Code ran too long. It ran for more than '.$Apache::lonnet::perlvar{'lonScriptTimeout'}.' seconds occured while running <while$gt; on line '.$line.'</pre>');
+ &Apache::lonxml::error('<pre>'.&mt('Code ran too long. It ran for more than').' '.$Apache::lonnet::perlvar{'lonScriptTimeout'}.' '.&mt('seconds occured while running <while$gt; on line').' '.$line.'</pre>');
}
} elsif ($target eq "edit") {
$result.= &Apache::edit::tag_end($target,$token,'');
@@ -953,12 +957,12 @@
if ( $status eq 'CLOSED' ) {
my $bodytext=&Apache::lonxml::get_all_text("/part",$parser);
if ( $target eq "web" ) {
- $result="<br />Part is not open to be viewed. It $accessmsg<br />";
+ $result="<br />".&mt('Part is not open to be viewed. It')." $accessmsg<br />";
} elsif ( $target eq 'tex' ) {
if (not $ENV{'form.problem_split'}=~/yes/) {
- $result="\\end{minipage}\\vskip 0 mm Part is not open to be viewed. It $accessmsg \\\\\\begin{minipage}{\\textwidth}";
+ $result="\\end{minipage}\\vskip 0 mm ".&mt('Part is not open to be viewed. It')." $accessmsg \\\\\\begin{minipage}{\\textwidth}";
} else {
- $result="\\vskip 0 mm Part is not open to be viewed. It $accessmsg \\\\";
+ $result="\\vskip 0 mm ".&mt('Part is not open to be viewed. It')." $accessmsg \\\\";
}
}
} else {
@@ -1090,8 +1094,8 @@
if ($target eq 'edit') {
$text=&Apache::lonxml::get_all_text("endouttext",$parser);
- $result.=&Apache::edit::start_table($token)."<tr><td>Text Block</td>
-<td>Delete:".
+ $result.=&Apache::edit::start_table($token)."<tr><td>".&mt('Text Block')."</td>
+<td>".&mt('Delete:').
&Apache::edit::deletelist($target,$token)
."</td>
<td>".
@@ -1150,7 +1154,7 @@
my $url=$ENV{'REQUEST_URI'};
$url=~s/\?.*$//;
$result='<table width="100%" bgcolor="#FFFFAA" border="2"><tr><td>'.
- '<a href="'.$url.'/smpedit">Simple Problem Editor</a> - Note: it can take up to 10 minutes for changes to take effect for all users.'.
+ '<a href="'.$url.'/smpedit">'.&mt('Simple Problem Editor').'</a> - '.&mt('Note: it can take up to 10 minutes for changes to take effect for all users.').
&Apache::loncommon::help_open_topic('Caching').'</td></tr></table><br />';
}
return $result;