[LON-CAPA-cvs] cvs: loncom /interface londocs.pm /publisher lonpubdir.pm

[bisitz]

bisitz		Tue Jul 14 12:27:58 2009 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
    /loncom/publisher	lonpubdir.pm 
  Log:
  Use new folder icon
  
  Credits: Juliane Wenzel
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.379 loncom/interface/londocs.pm:1.380
--- loncom/interface/londocs.pm:1.379	Mon Jul 13 17:34:28 2009
+++ loncom/interface/londocs.pm	Tue Jul 14 12:27:52 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.379 2009/07/13 17:34:28 bisitz Exp $
+# $Id: londocs.pm,v 1.380 2009/07/14 12:27:52 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1290,7 +1290,7 @@
 	if ($extension eq 'sequence' &&
 	    $env{'docs.markedcopy_url'} =~ m{/default_\d+\.sequence$ }x) {
 	    $icon = &Apache::loncommon::lonhttpdurl($r->dir_config('lonIconsURL'));
-	    $icon .= '/folder_closed.gif';
+	    $icon .= '/navmap.folder.closed.gif';
 	}
 	$icon = '<img src="'.$icon.'" alt="" class="LC_icon" />';
 	$r->print($icon.$type.': '.  &parse_supplemental_title(&LONCAPA::map::qtescape($env{'docs.markedcopy_title'})));
@@ -1919,7 +1919,7 @@
     my $pagefile;
     if ($uploaded) {
 	if ($extension eq 'sequence') {
-	    $icon=$iconpath.'/folder_closed.gif';
+	    $icon=$iconpath.'/navmap.folder.closed.gif';
 	    $url=~/\Q$coursenum\E\/([\/\w]+)\.sequence$/;
 	    $url='/adm/coursedocs?';
 	    $folderarg=$1;
Index: loncom/publisher/lonpubdir.pm
diff -u loncom/publisher/lonpubdir.pm:1.122 loncom/publisher/lonpubdir.pm:1.123
--- loncom/publisher/lonpubdir.pm:1.122	Thu May 28 17:08:38 2009
+++ loncom/publisher/lonpubdir.pm	Tue Jul 14 12:27:57 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construction Space Directory Lister
 #
-# $Id: lonpubdir.pm,v 1.122 2009/05/28 17:08:38 bisitz Exp $
+# $Id: lonpubdir.pm,v 1.123 2009/07/14 12:27:57 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -570,7 +570,7 @@
         }
 	$r->print('<tr class="LC_browser_folder">'.
 		  '<td><img src="'.
-		  $Apache::lonnet::perlvar{'lonIconsURL'}.'/folder_closed.gif" alt="folder" /></td>'.
+		  $Apache::lonnet::perlvar{'lonIconsURL'}.'/navmap.folder.closed.gif" alt="folder" /></td>'.
 		  '<td>'.$actionitem.'</td>'.
 		  '<td><span class="LC_filename"><a href="'.&HTML::Entities::encode($here.'/'.$dirname,'<>&"').'/" target="_parent">'.
 		  $disfilename.'</a></span></td>'.