Annotation of loncom/publisher/publisher.html, revision 1.5
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.5 ! 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>
1.5 ! www 27: <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished"
! 28: method="post" onSubmit="getdfilename();">
1.4 www 29: <input type="hidden" name="filename" value="">
1.5 ! www 30: <input type="submit" value="List Directory">
1.4 www 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>