Annotation of loncom/publisher/publisher.html, revision 1.6
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;
1.6 ! www 12: if (document.dpublisher.filename.value.indexOf('/adm/pubdir')==-1) {
! 13: document.dpublisher.submit();
! 14: }
1.4 www 15: }
16:
17: function getrfilename() {
18: document.rpublisher.filename.value=parent.LONCAPAToBePublished.location.href;
19: }
20:
1.1 www 21: </script>
22: </head>
23: <body bgcolor="#FFFFFF">
1.4 www 24: <table><tr><td>
1.5 www 25: <form name="publisher" action="/adm/publish" target="_parent" method="post"
26: onSubmit="getfilename();">
1.1 www 27: <input type="hidden" name="filename" value="">
28: <input type="submit" value="Publish this Resource">
1.4 www 29: </form></td><td>
1.5 www 30: <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished"
1.6 ! www 31: method="post">
1.4 www 32: <input type="hidden" name="filename" value="">
1.6 ! www 33: <input type="button" value="List Directory" onClick="getdfilename();">
1.4 www 34: </form></td><td>
35: <form name="rpublisher" action="/adm/retrieve" target="_parent" method="post"
36: onSubmit="getrfilename();">
37: <input type="hidden" name="filename" value="">
38: <input type="submit" value="Retrieve Old Version">
39: </form></td><td>
40: <b>LON-CAPA Construction Space</b>
41: </td></tr></table>
1.1 www 42: </body>
43: </html>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>