[LON-CAPA-cvs] cvs: loncom /interface portfolio.pm

banghart lon-capa-cvs@mail.lon-capa.org
Fri, 25 Feb 2005 18:05:30 -0000


banghart		Fri Feb 25 13:05:30 2005 EDT

  Modified files:              
    /loncom/interface	portfolio.pm 
  Log:
  	Remove .meta files from the portfolio directory display.
  
  
Index: loncom/interface/portfolio.pm
diff -u loncom/interface/portfolio.pm:1.77 loncom/interface/portfolio.pm:1.78
--- loncom/interface/portfolio.pm:1.77	Sun Feb 20 21:20:12 2005
+++ loncom/interface/portfolio.pm	Fri Feb 25 13:05:29 2005
@@ -122,7 +122,7 @@
     	#$dom 
     	my ($filename,$dom,undef,$testdir,undef,undef,undef,undef,$size,undef,$mtime,undef,undef,undef,$obs,undef)=split(/\&/,$line,16); 
     	$filename =~ s/\s+$//;
-    	if (($filename ne '.') && ($filename ne '..')) {
+    	if (($filename ne '.') && ($filename ne '..') && ($filename !~ /\.meta$/ )) {
             if ($dirptr&$testdir) {
                 if ($select_mode eq 'true'){
                     $r->print('<tr bgcolor="#FFAA99"><td><img src="'.$iconpath.'folder_closed.gif"></td>');