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

[albertel]

albertel		Fri Jul 13 16:11:28 2007 EDT

  Modified files:              
    /loncom/publisher	lonpublisher.pm 
  Log:
  - BUG#5286 warn about rights delay on publish
  
  
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.226 loncom/publisher/lonpublisher.pm:1.227
--- loncom/publisher/lonpublisher.pm:1.226	Fri Jul 13 15:23:33 2007
+++ loncom/publisher/lonpublisher.pm	Fri Jul 13 16:11:27 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.226 2007/07/13 19:23:33 albertel Exp $
+# $Id: lonpublisher.pm,v 1.227 2007/07/13 20:11:27 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1440,6 +1440,11 @@
 		&mt('No write permission to user directory, FAIL').'</span>');
         return 0;
     }
+    
+    if ($source =~ /\.rights$/) {
+	$r->print('<p><span class="LC_warning">'.&mt('Warning: It can take up to 1 hour for rights changes to fully propagate.').'</span></p>');
+    }
+
     print $logfile 
         "\n================= Publish ".localtime()." Phase Two  ================\n".$env{'user.name'}.':'.$env{'user.domain'}."\n";