version 1.26, 2009/11/20 14:39:32
|
version 1.28, 2009/11/20 17:01:11
|
Line 423 sub display_two {
|
Line 423 sub display_two {
|
.' <input type="text" name="foldername" size="15" value="'.&mt('Type Name Here').'" />' |
.' <input type="text" name="foldername" size="15" value="'.&mt('Type Name Here').'" />' |
.'<br />' |
.'<br />' |
.'<label>' |
.'<label>' |
.'<input type="radio" name="toplevel" value="oldfolder" />' |
.'<input type="radio" name="toplevel" value="oldfolder" checked="checked" />' |
.&mt('Append listing of contents of top level of package to contents list for the current folder.') |
.&mt('Append listing of contents of top level of package to contents list for the current folder.') |
.'</label>' |
.'</label>' |
); |
); |
Line 609 sub display_three {
|
Line 609 sub display_three {
|
if ($tempdir =~ m/^\/home\/httpd\/perl\/tmp\/$crs\/\d{10}/) { |
if ($tempdir =~ m/^\/home\/httpd\/perl\/tmp\/$crs\/\d{10}/) { |
system("rm -r -f $tempdir"); |
system("rm -r -f $tempdir"); |
} |
} |
$r->print(<<ENDBLOCK); |
|
<table border='0' bgcolor='#F6F6F6'' cellspacing='0' cellpadding ='0' width='100%'> |
# All done, display success message |
<tr> |
$r->print( |
<td colspan='2'> |
'<p class="LC_success">' |
<table border='0' cellspacing='0' cellpadding='0'> |
.&mt('Your import is complete.') |
<tr> |
.'</p>' |
<td colspan='2' align='left'> |
); |
</td> |
# Re-initialize Button |
</tr> |
my $initbutton = |
<tr bgcolor='#CCCCFF'> |
'<input type="button" value="' |
<td valign="middle"><img src="/res/adm/pages/bl_step5.gif" alt="5" /> |
.&mt('re-initializing course') |
</td> |
.'" onClick="javascript:init(this.form)" />'; |
<td width='100%' align='left'> |
$r->print( |
<font face='arial,helvetica,sans-serif'><b>Your import is complete</b></font> |
'<form method="post" action="/adm/roles" target="loncapaclient" name="importDone">' |
</td> |
.'<input type="hidden" name="orgurl" value="/adm/coursedocs" />' |
</tr> |
.'<input type="hidden" name="selectrole" value="1" />' |
<tr> |
.'<input type="hidden" name="'.$env{'request.role'}.'" value="1" />' |
<td colspan='2'> </td> |
.'<p class="LC_warning">' |
</tr> |
.&mt('Changes will become active for your current session after [_1]' |
<tr> |
.', or the next time you log in.' |
<td> </td> |
,$initbutton) |
<td> |
.'</p>' |
ENDBLOCK |
.'</form>' |
my $initblock = qq| |
); |
<form method="post" action="/adm/roles" target="loncapaclient" name="importDone"> |
|
<input type="hidden" name="orgurl" value="/adm/coursedocs" /> |
|
<input type="hidden" name="selectrole" value="1" /> |
|
<h3><font color="red">Changes will become active for your current session after |
|
<input type="hidden" name="$env{'request.role'}" value="1" /> |
|
<input type="button" value="|; |
|
$initblock .= &mt('re-initializing course'); |
|
$initblock .= qq|" onClick="javascript:init(this.form)" />|; |
|
$initblock .= ', '.&mt('or the next time you log in.'); |
|
$initblock .= qq|</font></h3></form>|; |
|
$r->print($initblock); |
|
$r->print(<<ENDBLOCKTWO); |
|
</table> |
|
</td> |
|
</tr> |
|
</table> |
|
ENDBLOCKTWO |
|
} |
} |
|
|
1; |
1; |