--- loncom/interface/londocs.pm 2003/11/07 23:22:21 1.95 +++ loncom/interface/londocs.pm 2004/01/13 01:55:22 1.98 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.95 2003/11/07 23:22:21 www Exp $ +# $Id: londocs.pm,v 1.98 2004/01/13 01:55:22 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -425,14 +425,11 @@ END # Figure out what kind of a resource this is my ($extension)=($url=~/\.(\w+)$/); my $uploaded=($url=~/^\/*uploaded\//); - my $icon='unknown'; - if (-e "/home/httpd/html/adm/lonIcons/$extension.gif") { - $icon=$extension; - } + my $icon=&Apache::loncommon::icon($url); my $isfolder=0; if ($uploaded) { if ($extension eq 'sequence') { - $icon='folder_closed'; + $icon=$iconpath.'/folder_closed.gif'; $url=~/\/(\w+)\.sequence/; $url='/adm/coursedocs?folder='.$1; $isfolder=1; @@ -454,8 +451,7 @@ END if ($isfolder) { $url.='&foldername='. &Apache::lonnet::escape($foldertitle); } $line.='
$lt{'spec'} |
---|
-File: +$lt{'file'}: |