[Lxr-commits] CVS: lxr/lib/LXR Tagger.pm,1.18,1.19

[Malcolm B. <mb...@us...>]

Update of /cvsroot/lxr/lxr/lib/LXR
In directory usw-pr-cvs1:/tmp/cvs-serv30842/lib/LXR

Modified Files:
	Tagger.pm 
Log Message:
Remove obsolete code


Index: Tagger.pm
===================================================================
RCS file: /cvsroot/lxr/lxr/lib/LXR/Tagger.pm,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -d -r1.18 -r1.19
--- Tagger.pm	2001/08/15 15:50:27	1.18
+++ Tagger.pm	2001/10/23 14:30:18	1.19
@@ -92,45 +92,4 @@
 	$revision = undef;
   }
 
-
-
-# Ctags
-package LXR::Tagger::ctags;
-
-# Excuberant ctags
-package LXR::Tagger::ectags;
-
-#  			open(TMP, "> /tmp/lxrref");
-#  			print(TMP $files->getfile($pathname, $release));
-#  			close(TMP);
-			
-#  				|| die "Can't run ctags";
-#  #		open(CTAGS, "ctags-3.2/ctags --excmd=number --sort=no --lang=c++ --c-types=cdefgmnpstuvx -f - ".$$files{'rootpath'}.$release.$pathname." |");
-#  			while (<CTAGS>) {
-#  				chomp;
-#  				@_ = split(/\t/, $_);
-#  				$_[2] =~ s/;\"$//;
-				
-#  				$index->index($_[0], $release, $pathname, $_[2], $_[3]);
-				
-#  				if ($_[4] eq '') {
-#  				}
-#  				elsif ($_[4] =~ /^file:/) {
-#  				}
-#  				elsif ($_[4] =~ /^struct:(.*)/) {
-#  					$index->relate($_[0], $release, $1, 'struct member');
-#  				}
-#  				elsif ($_[4] =~ /^union:(.*)/) {
-#  					$index->relate($_[0], $release, $1, 'union member');
-#  				}
-#  				elsif ($_[4] =~ /^class:(.*)/) {
-#  					$index->relate($_[0], $release, $1, 'class member');
-#  				}
-#  				else {
-#  					print(STDERR "** Unknown : $_\n");
-#  				}
-#  			}
-#  			close(CTAGS);
-
-
 1;