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

albertel lon-capa-cvs@mail.lon-capa.org
Tue, 20 Jan 2004 22:52:17 -0000


albertel		Tue Jan 20 17:52:17 2004 EDT

  Modified files:              
    /loncom/publisher	lonpublisher.pm 
  Log:
  - not the best fix in the word, but rules need to be added together not overwrite.
    probably should create some kind of list of which metadata appends and which overwrite.
  
  
  
Index: loncom/publisher/lonpublisher.pm
diff -u loncom/publisher/lonpublisher.pm:1.161 loncom/publisher/lonpublisher.pm:1.162
--- loncom/publisher/lonpublisher.pm:1.161	Mon Jan  5 17:29:51 2004
+++ loncom/publisher/lonpublisher.pm	Tue Jan 20 17:52:17 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.161 2004/01/05 22:29:51 albertel Exp $
+# $Id: lonpublisher.pm,v 1.162 2004/01/20 22:52:17 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -204,7 +204,11 @@
 		if ($newentry !~m|^/res|) { $newentry=$prefix.$newentry; }
 	    }
 # actually store
-	    $metadatafields{$unikey}=$newentry;
+	    if ( $entry eq 'rule' && exists($metadatafields{$unikey})) {
+		$metadatafields{$unikey}.=','.$newentry;
+	    } else {
+		$metadatafields{$unikey}=$newentry;
+	    }
 	}
     }
 }