--- loncom/publisher/lonpubdir.pm	2004/06/07 22:34:12	1.60
+++ loncom/publisher/lonpubdir.pm	2004/06/18 16:52:19	1.61
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construction Space Directory Lister
 #
-# $Id: lonpubdir.pm,v 1.60 2004/06/07 22:34:12 albertel Exp $
+# $Id: lonpubdir.pm,v 1.61 2004/06/18 16:52:19 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -256,6 +256,11 @@ sub getCopyRightString {
     my $fullname = shift;
     return &Apache::lonnet::metadata($fullname, 'copyright');
 }
+
+sub getSourceRightString {
+    my $fullname = shift;
+    return &Apache::lonnet::metadata($fullname, 'sourceavail');
+}
 #
 #  Put out a directory table row:
 #    putdirectory(r, base, here, dirname, modtime)
@@ -321,7 +326,8 @@ sub putresource {
 	$publish_button=&mt('Re-Publish');
 	if ($rmtime>=$cmtime) {
 	    $status=&mt('Published').'<br />'.
-		&mt(&getCopyRightString($targetdir.'/'.$filename));
+		&mt(&getCopyRightString($targetdir.'/'.$filename)).' '.
+		&mt(&getSourceRightString($targetdir.'/'.$filename));
 	    $bgcolor='#CCFF88';
 	    if (&Apache::lonnet::metadata($targetdir.'/'.$filename,'obsolete')) {
 		$status=&mt('Obsolete');
@@ -332,7 +338,8 @@ sub putresource {
 		&getTitleString($targetdir.'/'.$filename).'</a>';
 	} else {
 	    $status=&mt('Modified').'<br />'.
-		&mt(&getCopyRightString($targetdir.'/'.$filename));
+		&mt(&getCopyRightString($targetdir.'/'.$filename)).' '.
+		&mt(&getSourceRightString($targetdir.'/'.$filename));
             $bgcolor='#FFFF77';
 	    $title='<a href="/res/'.$targetdir.'/'.$filename.'.meta" target=cat>'.
 		&getTitleString($targetdir.'/'.$filename).'</a>';