[BACK]Return to publisher.html CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / publisher
File:  [LON-CAPA] / loncom / publisher / publisher.html
Revision 1.6: download - view: text, annotated - select for diffs
Mon Apr 2 21:28:58 2001 UTC (23 years, 3 months ago) by www
Branches: MAIN
CVS tags: HEAD
Does not load directory if already loaded

    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: 
   10: function getdfilename() {
   11:   document.dpublisher.filename.value=parent.LONCAPAToBePublished.location.href;
   12:   if (document.dpublisher.filename.value.indexOf('/adm/pubdir')==-1) {
   13:       document.dpublisher.submit();
   14:   }
   15: }
   16: 
   17: function getrfilename() {
   18:   document.rpublisher.filename.value=parent.LONCAPAToBePublished.location.href;
   19: }
   20: 
   21: </script>
   22: </head>
   23: <body bgcolor="#FFFFFF">
   24: <table><tr><td>
   25: <form name="publisher" action="/adm/publish" target="_parent" method="post" 
   26: onSubmit="getfilename();">
   27: <input type="hidden" name="filename" value="">
   28: <input type="submit" value="Publish this Resource">
   29: </form></td><td>
   30: <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished" 
   31: method="post">
   32: <input type="hidden" name="filename" value="">
   33: <input type="button" value="List Directory" onClick="getdfilename();">
   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>
   42: </body>
   43: </html>
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>