version 1.39, 2013/06/04 22:20:28
|
version 1.42, 2013/07/15 16:13:16
|
Line 100 function createWin() {
|
Line 100 function createWin() {
|
newWindow.document.write("<input type='hidden' name='action' value='newdir' />") |
newWindow.document.write("<input type='hidden' name='action' value='newdir' />") |
newWindow.document.write("<input type='hidden' name='callingmode' value='imsimport' />") |
newWindow.document.write("<input type='hidden' name='callingmode' value='imsimport' />") |
newWindow.document.write("$fullpath<input type='text' name='newfilename' value='' />") |
newWindow.document.write("$fullpath<input type='text' name='newfilename' value='' />") |
newWindow.document.write("<input type='button' value='$lt{'go'}' onClick='document.fileaction.submit();' />") |
newWindow.document.write("<input type='button' value='$lt{'go'}' onclick='document.fileaction.submit();' />") |
newWindow.document.write("</td></tr>\\n") |
newWindow.document.write("</td></tr>\\n") |
newWindow.document.write("</table>") |
newWindow.document.write("</table>") |
newWindow.document.write('$end_page') |
newWindow.document.write('$end_page') |
Line 286 END_OF_TWO
|
Line 286 END_OF_TWO
|
# ---------------------------------------------------------------- Display One |
# ---------------------------------------------------------------- Display One |
sub display_one { |
sub display_one { |
my ($r,$fn,$fullpath,$formname) = @_; |
my ($r,$fn,$fullpath,$formname) = @_; |
$r->print('<form name="'.$formname.'" method="post">'. |
$r->print('<form name="'.$formname.'" method="post" action="">'. |
&Apache::lonhtmlcommon::topic_bar(1,&mt('Specify the Course Management system used to create the package')). |
&Apache::lonhtmlcommon::topic_bar(1,&mt('Specify the Course Management system used to create the package')). |
&mt('Choose the CMS used to create your IMS content package.').' |
&mt('Choose the CMS used to create your IMS content package.').' |
<select name="source"> |
<select name="source"> |
Line 298 sub display_one {
|
Line 298 sub display_one {
|
<option value="webctvista4">WebCT Vista 4</option> |
<option value="webctvista4">WebCT Vista 4</option> |
</select><br />'."\n". |
</select><br />'."\n". |
&Apache::lonhtmlcommon::topic_bar(2,&mt('Create a directory where you will unpack your IMS package'))."\n". |
&Apache::lonhtmlcommon::topic_bar(2,&mt('Create a directory where you will unpack your IMS package'))."\n". |
&mt('Create a destination LON-CAPA directory in which to store the contents of the IMS package file.').' <input type="button" name="createdir" value="Create Directory" onClick="javascript:createWin()" /><input type="hidden" name="newdir" value="" /><br /><br /> |
&mt('Create a destination LON-CAPA directory in which to store the contents of the IMS package file.').' <input type="button" name="createdir" value="Create Directory" onclick="javascript:createWin()" /><input type="hidden" name="newdir" value="" /><br /><br /> |
<input type="hidden" name="filename" value="'.$fn.'" /> |
<input type="hidden" name="filename" value="'.$fn.'" /> |
<input type="hidden" name="phase" value="three" /> |
<input type="hidden" name="phase" value="three" /> |
<input type="button" name="nextpage" value="'.&mt('Proceed').'" onClick="javascript:nextPage();" /> |
<input type="button" name="nextpage" value="'.&mt('Proceed').'" onclick="javascript:nextPage();" /> |
<input type="button" name="exitpage" value="'.&mt('Exit now').'" onClick="javascript:location.href='."'$fullpath'".'" /> |
<input type="button" name="exitpage" value="'.&mt('Exit now').'" onclick="javascript:location.href='."'$fullpath'".'" /> |
</form>'); |
</form>'); |
} |
} |
|
|
Line 396 sub display_two {
|
Line 396 sub display_two {
|
$conditions = 'none'; |
$conditions = 'none'; |
} |
} |
|
|
$r->print('<form name="pickoptions" method="post">'. |
$r->print('<form name="pickoptions" method="post" action="">'. |
&Apache::lonhtmlcommon::topic_bar(3,$lt{'cont'}). |
&Apache::lonhtmlcommon::topic_bar(3,$lt{'cont'}). |
&Apache::loncommon::start_data_table(). |
&Apache::loncommon::start_data_table(). |
&Apache::loncommon::start_data_table_header_row(). |
&Apache::loncommon::start_data_table_header_row(). |
Line 409 sub display_two {
|
Line 409 sub display_two {
|
$r->print(&Apache::loncommon::start_data_table_row()."\n". |
$r->print(&Apache::loncommon::start_data_table_row()."\n". |
'<td><input name="'.$area.'" type="checkbox" '); |
'<td><input name="'.$area.'" type="checkbox" '); |
if ($area eq 'board' || $area eq 'users') { |
if ($area eq 'board' || $area eq 'users') { |
$r->print('onClick="javascript:setOptions('."'$area','$counter'".');" '); |
$r->print('onclick="javascript:setOptions('."'$area','$counter'".');" '); |
} |
} |
$r->print('/></td>'. |
$r->print('/></td>'. |
'<td> '.$$areaname{$area}.' - '. |
'<td> '.$$areaname{$area}.' - '. |
Line 459 sub display_two {
|
Line 459 sub display_two {
|
if ($count{users} == 0) { |
if ($count{users} == 0) { |
$r->print('<input type="hidden" name="users" value="" />'."\n"); |
$r->print('<input type="hidden" name="users" value="" />'."\n"); |
} |
} |
$r->print('<input type="button" name="nextpage" value="'.$lt{'impa'}.'" onClick="javascript:nextPage('."'$counter.'".')" /> |
$r->print('<input type="button" name="nextpage" value="'.$lt{'impa'}.'" onclick="javascript:nextPage('."'$counter.'".')" /> |
<input type="button" name="exitpage" value="'.$lt{'exit'}.'" onClick="javascript:location.href='."'$fullpath'".'" /></form>'); |
<input type="button" name="exitpage" value="'.$lt{'exit'}.'" onclick="javascript:location.href='."'$fullpath'".'" /></form>'); |
} else { |
} else { |
$r->print($lt{'unpa'}); |
$r->print($lt{'unpa'}); |
} |
} |
Line 751 END_JS
|
Line 751 END_JS
|
&display_three($r,$uname,$udom,\@areas,\%areaname,\%cmsmap,$destdir,$dirpath); |
&display_three($r,$uname,$udom,\@areas,\%areaname,\%cmsmap,$destdir,$dirpath); |
} |
} |
} else { |
} else { |
&Apache::lonupload::phaseone($r,$fn,'imsimport'); |
&Apache::lonupload::phaseone($r,$fn,'imsimport',$uname,$udom); |
} |
} |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
return OK; |
return OK; |