[Lxr-commits] CVS: lxr source,1.32,1.33

[Dave B. <bro...@us...>]

Update of /cvsroot/lxr/lxr
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13837

Modified Files:
	source 
Log Message:
use apache-provided icons

Index: source
===================================================================
RCS file: /cvsroot/lxr/lxr/source,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -d -r1.32 -r1.33
--- source	29 Jul 2002 01:23:03 -0000	1.32
+++ source	28 Jun 2004 13:48:29 -0000	1.33
@@ -2,6 +2,7 @@
 # $Id$
 
 # source --	Present sourcecode as html, complete with references
+#  the '/icons' images are available in any standard Apache installation
 #
 #	Arne Georg Gleditsch <ar...@if...>
 #	Per Kristian Gjermshus <pe...@if...>
@@ -36,10 +37,9 @@
     my $img;
 
     if ($node eq '../') {
-	$img = "/icons/back.gif";
+        $img = "/icons/back.gif";
     } else {
-#      $img = "/icons/folder.gif";
-	$img = "internal-gopher-menu";
+        $img = "/icons/folder.gif";
     }
 
     return fileref("<img align=\"bottom\" border=\"0\" src=\"$img\" alt=\"folder\">", "",
@@ -63,15 +63,18 @@
     my $img;
 
     if ($node =~ /^.*\.[ch]$/) {
-#      $img = "/icons/c.gif";
-	$img = "internal-gopher-text";
+        $img = "/icons/c.gif";
     } elsif ($node =~ /^.*\.(cpp|cc|java)$/) {
-	# TODO: Find a nice icon for c++ files (KDE?)
-#      $img = "/icons/c.gif";
-	$img = "internal-gopher-text";
-    } else {		
-	#      $img = "/icons/text.gif";
-	$img = "internal-gopher-unknown";
+        # TODO: Find a nice icon for c++ files (KDE?)
+        $img = "/icons/c.gif";
+    } elsif ($node =~ /^.*\.(txt)$/) {
+        $img = "/icons/text.gif";
+    } elsif ($node =~ /^.*\.(jar|war|ear|zip|tar|gz|tgz|cab)$/) {
+        $img = "/icons/compressed.gif";
+    } elsif ($node =~ /^.*\.(jpg|jpeg|gif|bmp|png)$/) {
+        $img = "/icons/image2.gif";
+    } else {
+        $img = "/icons/generic.gif";
     }
     return fileref("<img align=\"bottom\" border=\"0\" src=\"$img\" alt=\"\">",
                    "", $dir.$node);