[interchange-cvs] interchange - jon modified lib/Vend/DbSearch.pm
interchange-core@interchange.redhat.com
interchange-core@interchange.redhat.com
Mon Nov 26 09:34:01 2001
User: jon
Date: 2001-11-26 14:33:26 GMT
Modified: lib/Vend Tag: STABLE_4_8-branch DbSearch.pm
Log:
Remove tab-bug fix at Mike and Stefan's request.
To be revisited before 4.8.4 ...
Revision Changes Path
No revision
No revision
2.0.2.7 +2 -5 interchange/lib/Vend/DbSearch.pm
rev 2.0.2.7, prev_rev 2.0.2.6
Index: DbSearch.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/DbSearch.pm,v
retrieving revision 2.0.2.6
retrieving revision 2.0.2.7
diff -u -u -r2.0.2.6 -r2.0.2.7
--- DbSearch.pm 2001/11/22 03:51:08 2.0.2.6
+++ DbSearch.pm 2001/11/26 14:33:26 2.0.2.7
@@ -1,6 +1,6 @@
# Vend::DbSearch - Search indexes with Interchange
#
-# $Id: DbSearch.pm,v 2.0.2.6 2001/11/22 03:51:08 jon Exp $
+# $Id: DbSearch.pm,v 2.0.2.7 2001/11/26 14:33:26 jon Exp $
#
# Adapted for use with Interchange from Search::TextSearch
#
@@ -26,7 +26,7 @@
@ISA = qw(Vend::Search);
-$VERSION = substr(q$Revision: 2.0.2.6 $, 10);
+$VERSION = substr(q$Revision: 2.0.2.7 $, 10);
use Search::Dict;
use strict;
@@ -256,7 +256,6 @@
#::logDebug("no f, limit, dbref=$dbref");
local($_);
while ($_ = join "\t",
- map { s/\t/ /g; $_ }
$dbref->each_nokey($qual || undef)
) {
next unless &$limit_sub($_);
@@ -267,7 +266,6 @@
#::logDebug("f and limit, dbref=$dbref");
local($_);
while ($_ = join "\t",
- map { s/\t/ /g; $_ }
$dbref->each_nokey($qual || undef)
) {
next unless &$f();
@@ -282,7 +280,6 @@
#::logDebug("f and no limit, dbref=$dbref");
local($_);
while ($_ = join "\t",
- map { s/\t/ /g; $_ }
$dbref->each_nokey($qual || undef)
) {
next unless &$f();