Annotation of loncom/publisher/publisher.html, revision 1.7

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;
                     26: }
                     27: 
1.1       www        28: </script>
                     29: </head>
                     30: <body bgcolor="#FFFFFF">
1.4       www        31: <table><tr><td>
1.7     ! www        32: <form name="publisher" action="/adm/publish" target="_parent" method="post">
1.1       www        33: <input type="hidden" name="filename" value="">
1.7     ! www        34: <input type="button" value="Publish this Resource" onClick="getfilename();">
1.4       www        35: </form></td><td>
1.5       www        36: <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished" 
1.6       www        37: method="post">
1.4       www        38: <input type="hidden" name="filename" value="">
1.6       www        39: <input type="button" value="List Directory" onClick="getdfilename();">
1.4       www        40: </form></td><td>
                     41: <form name="rpublisher" action="/adm/retrieve" target="_parent" method="post"
                     42:  onSubmit="getrfilename();">
                     43: <input type="hidden" name="filename" value="">
                     44: <input type="submit" value="Retrieve Old Version">
                     45: </form></td><td>
                     46: <b>LON-CAPA Construction Space</b>
                     47: </td></tr></table>
1.1       www        48: </body>
                     49: </html>

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>