version 1.146, 2003/09/18 20:32:29
|
version 1.149, 2003/09/19 14:11:11
|
Line 445 sub analyze {
|
Line 445 sub analyze {
|
} |
} |
} |
} |
if (scalar(keys(%allparts)) == 0 ) { |
if (scalar(keys(%allparts)) == 0 ) { |
$request->print('<p>'.&mt('Found no analyzable parts in this problem, |
$request->print('<p>'.&mt('Found no analyzable parts in this problem, currently only Numerical, Formula and String response styles are supported.').'</p>'); |
currently only Numerical, Formula and String response |
|
styles are supported.').'</p>'); |
|
} |
} |
&Apache::lonhtmlcommon::Close_PrgWin($request,\%prog_state); |
&Apache::lonhtmlcommon::Close_PrgWin($request,\%prog_state); |
&analyze_footer($request); |
&analyze_footer($request); |
Line 599 sub newproblem {
|
Line 597 sub newproblem {
|
} |
} |
my $instructions; |
my $instructions; |
if ($templatelist) { $instructions=&mt(", select a template from the pull-down menu below.").'<br />'.&mt("Then");} |
if ($templatelist) { $instructions=&mt(", select a template from the pull-down menu below.").'<br />'.&mt("Then");} |
my %lt=&texthash( 'create' => 'Creating a new', |
my %lt=&Apache::lonlocal::texthash( 'create' => 'Creating a new', |
'resource' => 'resource', |
'resource' => 'resource', |
'requested' => 'The requested file', |
'requested' => 'The requested file', |
'not exist' => 'currently does not exist', |
'not exist' => 'currently does not exist', |
Line 609 sub newproblem {
|
Line 607 sub newproblem {
|
'button' => 'button'); |
'button' => 'button'); |
$request->print(<<ENDNEWPROBLEM); |
$request->print(<<ENDNEWPROBLEM); |
<body bgcolor="#FFFFFF"> |
<body bgcolor="#FFFFFF"> |
<h1>$lt{'create'} $extension <{'resource'}</h1> |
<h1>$lt{'create'} $extension $lt{'resource'}</h1> |
$errormsg |
$errormsg |
$lt{'requested'} <tt>$url</tt> $lt{'not exist'}. |
$lt{'requested'} <tt>$url</tt> $lt{'not exist'}. |
<p> |
<p> |
Line 629 ENDNEWPROBLEM
|
Line 627 ENDNEWPROBLEM
|
sub view_or_edit_menu { |
sub view_or_edit_menu { |
my ($request) = @_; |
my ($request) = @_; |
my $url=$request->uri; |
my $url=$request->uri; |
my %lt=&texthash( 'would' => 'Would you like to', |
my %lt=&Apache::lonlocal::texthash( 'would' => 'Would you like to', |
'view' => 'View', |
'view' => 'View', |
'Edit' => 'edit', |
'Edit' => 'edit', |
'or' => 'or', |
'or' => 'or', |