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