[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;