--- loncom/publisher/lonpublisher.pm	2004/05/21 20:21:32	1.170
+++ loncom/publisher/lonpublisher.pm	2004/06/11 02:27:27	1.171
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.170 2004/05/21 20:21:32 www Exp $
+# $Id: lonpublisher.pm,v 1.171 2004/06/11 02:27:27 taceyjo1 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1259,6 +1259,12 @@ END
 	    $intr_scrout.=&textfield('Custom Distribution File','customdistributionfile',
 				$metadatafields{'customdistributionfile'}).
 				    $copyright_help;
+	    $intr_scrout.=&selectbox('Source Distribution','sourceavail',
+				    $defaultoption,
+				    \&Apache::loncommon::source_copyrightdescription,
+				    (&Apache::loncommon::source_copyrightids));
+		 $intr_scrout.=&textfield('Source Custom Distribution File','sourcerights',
+				$metadatafields{'sourcerights'});
 	    my $uctitle=&mt('Obsolete');
             $intr_scrout.=
 		"\n<p><font color=\"#800000\" face=\"helvetica\"><b>$uctitle:".
@@ -1362,6 +1368,7 @@ sub phasetwo {
     $metadatafields{'highestgradelevel'}=$ENV{'form.highestgradelevel'};
     $metadatafields{'customdistributionfile'}=
                                  $ENV{'form.customdistributionfile'};
+    $metadatafields{'sourceavail'}=$ENV{'form.sourceavail'};
     $metadatafields{'obsolete'}=$ENV{'form.obsolete'};
     $metadatafields{'obsoletereplacement'}=
 	                        $ENV{'form.obsoletereplacement'};