--- loncom/publisher/lonpublisher.pm	2004/06/11 20:11:06	1.172
+++ loncom/publisher/lonpublisher.pm	2004/06/18 16:02:18	1.173
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.172 2004/06/11 20:11:06 matthew Exp $
+# $Id: lonpublisher.pm,v 1.173 2004/06/18 16:02:18 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1205,6 +1205,11 @@ END
     $intr_scrout.=&textfield('Publisher/Owner','owner',
 			     $metadatafields{'owner'});
 
+# ---------------------------------------------- Retrofix for unused copyright
+    if ($metadatafields{'copyright'} eq 'free') {
+	$metadatafields{'copyright'}='default';
+	$metadatafields{'sourceavail'}='open';
+    }
 # -------------------------------------------------- Correct copyright for rat.
     my $defaultoption=$metadatafields{'copyright'};
     unless ($defaultoption) { $defaultoption='default'; }