--- loncom/publisher/publisher.html	2001/04/02 21:45:58	1.7
+++ loncom/publisher/publisher.html	2001/04/03 14:57:17	1.8
@@ -23,6 +23,13 @@ function getdfilename() {
 
 function getrfilename() {
   document.rpublisher.filename.value=parent.LONCAPAToBePublished.location.href;
+   if ((document.rpublisher.filename.value.charAt(
+        document.rpublisher.filename.value.length-1)!='/') &&
+       (document.rpublisher.filename.value.indexOf('/adm/pubdir')==-1)) {
+        document.rpublisher.submit();
+   } else {
+      alert('Cannot retrieve directory');
+   }
 }
 
 </script>
@@ -38,10 +45,9 @@ method="post">
 <input type="hidden" name="filename" value="">
 <input type="button" value="List Directory" onClick="getdfilename();">
 </form></td><td>
-<form name="rpublisher" action="/adm/retrieve" target="_parent" method="post"
- onSubmit="getrfilename();">
+<form name="rpublisher" action="/adm/retrieve" target="_parent" method="post">
 <input type="hidden" name="filename" value="">
-<input type="submit" value="Retrieve Old Version">
+<input type="button" value="Retrieve Old Version" onClick="getrfilename();">
 </form></td><td>
 <b>LON-CAPA Construction Space</b>
 </td></tr></table>