[LON-CAPA-cvs] cvs: loncom /publisher lonpubdir.pm lonpublisher.pm

[albertel]

albertel		Mon Jan 24 16:55:20 2005 EDT

  Modified files:              
    /loncom/publisher	lonpubdir.pm lonpublisher.pm 
  Log:
  - BUG#3855, there was no way to avoid avoid forced republication of all files.
  
  
  
Index: loncom/publisher/lonpubdir.pm
diff -u loncom/publisher/lonpubdir.pm:1.75 loncom/publisher/lonpubdir.pm:1.76
--- loncom/publisher/lonpubdir.pm:1.75	Wed Dec 22 16:04:52 2004
+++ loncom/publisher/lonpubdir.pm	Mon Jan 24 16:55:20 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construction Space Directory Lister
 #
-# $Id: lonpubdir.pm,v 1.75 2004/12/22 21:04:52 albertel Exp $
+# $Id: lonpubdir.pm,v 1.76 2005/01/24 21:55:20 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -254,7 +254,7 @@
     }
 
     function forcepub(theform) {
-        if (confirm('Force publication of unmodified files? - OK=yes; Cancel=No.')) {
+        if (confirm('Force publication of unmodified files? -  Cancel=No; OK=yes.')) {
             theform.forcerepub.value="ON";
         } 
     }
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.183 loncom/publisher/lonpublisher.pm:1.184
--- loncom/publisher/lonpublisher.pm:1.183	Wed Jan 12 15:58:26 2005
+++ loncom/publisher/lonpublisher.pm	Mon Jan 24 16:55:20 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.183 2005/01/12 20:58:26 www Exp $
+# $Id: lonpublisher.pm,v 1.184 2005/01/24 21:55:20 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1693,7 +1693,7 @@
 		    $ruid,$rgid,$rrdev,$rsize,
 		    $ratime,$rmtime,$rctime,
 		    $rblksize,$rblocks)=stat($resdir.'/'.$filename);
-	        if (($rmtime<$cmtime) || ($ENV{'form.forcerepub'})) {
+	        if (($rmtime<$cmtime) || ($ENV{'form.forcerepub'} eq 'ON')) {
 # previously published, modified now
 		    $publishthis=1;
                 }