--- loncom/publisher/lonpubdir.pm	2001/04/03 14:52:23	1.3
+++ loncom/publisher/lonpubdir.pm	2001/05/03 11:04:07	1.5
@@ -92,6 +92,11 @@ sub handler {
             } else {
                 $status='Modified';
                 $bgcol='#FFFFBB';
+                if 
+            (&Apache::lonnet::fileembstyle(($filename=~/\.(\w+)$/)) eq 'ssi') {
+                   $status.='<br><a href="/adm/diff?filename='.$filename.
+		       '&versionone=priv" target=cat>Diffs</a>';
+	        }
             }   
 	 }
          $r->print('<tr bgcolor='.$bgcol.
@@ -115,3 +120,6 @@ sub handler {
   $r->print('</table></body></html>');
   return OK;  
 }
+
+1;
+__END__