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>