--- loncom/interface/lonindexer.pm 2009/03/17 20:07:45 1.190
+++ loncom/interface/lonindexer.pm 2009/03/17 23:11:20 1.192
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Directory Indexer
#
-# $Id: lonindexer.pm,v 1.190 2009/03/17 20:07:45 schulted Exp $
+# $Id: lonindexer.pm,v 1.192 2009/03/17 23:11:20 droeschl Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -527,7 +527,7 @@ END
# -------------------------------------------------------- Resource Home Button
my $reshome=$env{'course.'.$env{'request.course.id'}.'.reshome'};
if ($reshome) {
- $r->print("print('javascript:document.forms.fileattr.action="'.&Apache::loncommon::inhibit_menu_check($reshome).'";document.forms.fileattr.submit();');
} else {
@@ -549,7 +549,7 @@ END
#$r->print(&writedebug("Omit:@Omit")) if (@Omit);
#$r->print(&writedebug("Only:@Only")) if (@Only);
$r->print('
');
- $r->print(&Apache::loncommon::start_data_table("LC_tableOfContent")
+ $r->print(&Apache::loncommon::start_data_table("LC_tableBrowseRes")
.&Apache::loncommon::start_data_table_header_row());
$r->print("
".&mt('Name')." | \n");
$r->print("".&mt('Title')." | \n")
@@ -880,7 +880,7 @@ sub display_line {
$startdir.'" />'."\n");
$r->print (''."\n");
$r->print ('
print (' name="'.$msg.'" type="image" class="LC_icon" />'.
+ $r->print (' name="'.$msg.'" type="image" class="LC_fileicon" />'.
"\n");
$r->print(&mt("Up")."$tabtag");
$r->print(&Apache::loncommon::end_data_table_row());
@@ -907,15 +907,15 @@ sub display_line {
$r->print ('');
$r->print ('');
$r->print ('
print (' name="'.$msg.'" type="image" class="LC_icon" />'.
+ $r->print (' name="'.$msg.'" type="image" class="LC_fileicon" />'.
"\n");
my $quotable_filecom = &Apache::loncommon::escape_single($filecom[0]);
$r->print ('
print (' class="LC_icon" />'."\n");
+ $r->print (' class="LC_fileicon" />'."\n");
$r->print (&mt("Domain")." - $listname ");
if (&Apache::lonnet::domain($listname,'description')) {
- $r->print("(".&Apache::lonnet::domain($listname,'description').
+ $r->print("
(".&Apache::lonnet::domain($listname,'description').
")");
}
$r->print("$tabtag");
@@ -938,13 +938,13 @@ $r->print ('');
$r->print ('');
$r->print ('
print (' name="'.$msg.'" type="image" class="LC_indexer_icon" />'.
+ '.gif" class="LC_fileicon"');
+ $r->print (' name="'.$msg.'"/>'.
"\n");
my $quotable_curdir = &Apache::loncommon::escape_single($curdir);
$r->print ('
');
+ $iconpath.'quill.gif" class="LC_fileicon" />');
my $domain=(split(m|/|,$startdir))[2];
my $plainname=&Apache::loncommon::plainname($listname,$domain);
$r->print ($listname.'');
@@ -1021,13 +1021,15 @@ $r->print ('');
- $r->print ('print (' name="'.$msg.'" type="image" class="LC_icon" />'.
+ $r->print ('');
+ $r->print ('');
+ $r->print ('
print (' name="'.$msg.'" type="image" class="LC_fileicon" />'.
"\n");
}
# Filetype icons
- $r->print("
\n");
+ $r->print("
\n");
my $quotable_filelink = &Apache::loncommon::escape_single($filelink);
$r->print (" print (' '.($author eq '' ? ' ' : $author).
" \n");
}
if ($hash{'display_attrs_5'} == 1) {
@@ -1173,7 +1175,7 @@ $r->print ('');
$r->print ('
print (' name="'.$msg.'" class="LC_icon" />'.
+ $r->print (' name="'.$msg.'" class="LC_fileicon" />'.
"\n");
my $quotable_curdir = &Apache::loncommon::escape_single($curdir);
@@ -1181,7 +1183,7 @@ $r->print ('print (''
- .'
'.
"\n");
$r->print ("$listname\n");