--- loncom/interface/londocs.pm 2012/05/09 19:46:30 1.485 +++ loncom/interface/londocs.pm 2012/05/15 01:23:04 1.486 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.485 2012/05/09 19:46:30 raeburn Exp $ +# $Id: londocs.pm,v 1.486 2012/05/15 01:23:04 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -425,9 +425,11 @@ sub log_docs { sub docs_change_log { my ($r,$coursenum,$coursedom,$folder,$allowed,$crstype,$iconpath)=@_; + my $supplementalflag=($env{'form.folderpath'}=~/^supplemental/); my $js = '