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

www lon-capa-cvs@mail.lon-capa.org
Mon, 17 Mar 2003 16:58:09 -0000


www		Mon Mar 17 11:58:09 2003 EDT

  Modified files:              
    /loncom/publisher	lonpublisher.pm 
  Log:
  Towards bug #662 - parse rights files for metadata
  
  
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.118 loncom/publisher/lonpublisher.pm:1.119
--- loncom/publisher/lonpublisher.pm:1.118	Fri Mar 14 11:12:14 2003
+++ loncom/publisher/lonpublisher.pm	Mon Mar 17 11:58:09 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.118 2003/03/14 16:12:14 albertel Exp $
+# $Id: lonpublisher.pm,v 1.119 2003/03/17 16:58:09 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -814,7 +814,7 @@
     print $logfile 
 "\n\n================= Publish ".localtime()." Phase One  ================\n";
 
-    if (($style eq 'ssi') || ($style eq 'rat')) {
+    if (($style eq 'ssi') || ($style eq 'rat') || ($style eq 'prv')) {
 # ------------------------------------------------------- This needs processing
 
 # ----------------------------------------------------------------- Backup Copy
@@ -946,7 +946,7 @@
     }
 
 # -------------------------------------------------- Parse content for metadata
-    if ($style eq 'ssi') {
+    if (($style eq 'ssi') || ($style eq 'prv')) {
         my $oldenv=$ENV{'request.uri'};
 
         $ENV{'request.uri'}=$target;