Annotation of loncom/publisher/publisher.html, revision 1.4
1.1 www 1: <html>
2: <head>
3: <title>LON-CAPA Publishing Frame</title>
4: <script>
5:
6: function getfilename() {
7: document.publisher.filename.value=parent.LONCAPAToBePublished.location.href;
8: }
9:
1.4 ! www 10: function getdfilename() {
! 11: document.dpublisher.filename.value=parent.LONCAPAToBePublished.location.href;
! 12: }
! 13:
! 14: function getrfilename() {
! 15: document.rpublisher.filename.value=parent.LONCAPAToBePublished.location.href;
! 16: }
! 17:
1.1 www 18: </script>
19: </head>
20: <body bgcolor="#FFFFFF">
1.4 ! www 21: <table><tr><td>
1.2 www 22: <form name="publisher" action="/adm/publish" target="_parent" method="post"
23: onSubmit="getfilename();">
1.1 www 24: <input type="hidden" name="filename" value="">
25: <input type="submit" value="Publish this Resource">
1.4 ! www 26: </form></td><td>
! 27: <form name="dpublisher" action="/adm/pubdir" target="_parent" method="post"
! 28: onSubmit="getdfilename();">
! 29: <input type="hidden" name="filename" value="">
! 30: <input type="submit" value="Publish this Directory">
! 31: </form></td><td>
! 32: <form name="rpublisher" action="/adm/retrieve" target="_parent" method="post"
! 33: onSubmit="getrfilename();">
! 34: <input type="hidden" name="filename" value="">
! 35: <input type="submit" value="Retrieve Old Version">
! 36: </form></td><td>
! 37: <b>LON-CAPA Construction Space</b>
! 38: </td></tr></table>
1.1 www 39: </body>
40: </html>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>