--- loncom/interface/londocs.pm 2004/02/27 19:11:08 1.109 +++ loncom/interface/londocs.pm 2004/03/16 22:46:59 1.110 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.109 2004/02/27 19:11:08 albertel Exp $ +# $Id: londocs.pm,v 1.110 2004/03/16 22:46:59 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1013,6 +1013,14 @@ function makeabout() { } } +function makeims() { + var caller = document.forms.ims.folder.value + var newlocation = "/adm/imsimportdocs?folder="+caller+"&phase=one" + newWindow = window.open("","IMSimport","HEIGHT=700,WIDTH=750,scrollbars=yes") + newWindow.location.href = newlocation +} + + function finishpick() { var title=this.document.forms.extimport.title.value; var url=this.document.forms.extimport.url.value; @@ -1073,6 +1081,7 @@ ENDNEWSCRIPT 'bull' => 'Bulletin Board', 'mypi' => 'My Personal Info', 'abou' => 'About User', + 'imsf' => 'Import IMS package', 'file' => 'File', 'title' => 'Title', 'comment' => 'Comment' @@ -1269,6 +1278,11 @@ $help{'My Personal Info'} onClick="javascript:makeabout();" /> +
+ + + +
ENDFORM