[interchange-cvs] interchange - heins modified 4 files
interchange-core@icdevgroup.org
interchange-core@icdevgroup.org
Mon Jul 15 09:42:00 2002
User: heins
Date: 2002-07-15 13:41:13 GMT
Modified: lib/Vend DbSearch.pm Glimpse.pm RefSearch.pm TextSearch.pm
Log:
* Get rid of mv_range_look check now that it will be deprecated and removed
from docs.
Revision Changes Path
2.15 +2 -11 interchange/lib/Vend/DbSearch.pm
rev 2.15, prev_rev 2.14
Index: DbSearch.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/lib/Vend/DbSearch.pm,v
retrieving revision 2.14
retrieving revision 2.15
diff -u -r2.14 -r2.15
--- DbSearch.pm 9 Jul 2002 17:42:12 -0000 2.14
+++ DbSearch.pm 15 Jul 2002 13:41:12 -0000 2.15
@@ -1,6 +1,6 @@
# Vend::DbSearch - Search indexes with Interchange
#
-# $Id: DbSearch.pm,v 2.14 2002/07/09 17:42:12 mheins Exp $
+# $Id: DbSearch.pm,v 2.15 2002/07/15 13:41:12 mheins Exp $
#
# Adapted for use with Interchange from Search::TextSearch
#
@@ -26,7 +26,7 @@
=20
@ISA =3D qw(Vend::Search);
=20
-$VERSION =3D substr(q$Revision: 2.14 $, 10);
+$VERSION =3D substr(q$Revision: 2.15 $, 10);
=20
use Search::Dict;
use strict;
@@ -146,15 +146,6 @@
my (@fn) =3D $dbref->columns();
=20
@specs =3D @{$s->{mv_searchspec}};
-
- if(ref $s->{mv_range_look}) {
- unless( scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_min=
}}) and
- scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_max}}) ) {
- $s->{mv_search_warning}
- =3D "Must have min and max values for range -- aborting range look.";
- undef $s->{mv_range_look};
- }
- }
=20
@pats =3D $s->spec_check(@specs);
=20
2.6 +2 -10 interchange/lib/Vend/Glimpse.pm
rev 2.6, prev_rev 2.5
Index: Glimpse.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/lib/Vend/Glimpse.pm,v
retrieving revision 2.5
retrieving revision 2.6
diff -u -r2.5 -r2.6
--- Glimpse.pm 23 Jun 2002 01:20:10 -0000 2.5
+++ Glimpse.pm 15 Jul 2002 13:41:12 -0000 2.6
@@ -1,6 +1,6 @@
# Vend::Glimpse - Search indexes with Glimpse
#
-# $Id: Glimpse.pm,v 2.5 2002/06/23 01:20:10 jon Exp $
+# $Id: Glimpse.pm,v 2.6 2002/07/15 13:41:12 mheins Exp $
#
# Adapted for use with Interchange from Search::Glimpse
#
@@ -25,7 +25,7 @@
require Vend::Search;
@ISA =3D qw(Vend::Search);
=20
-$VERSION =3D substr(q$Revision: 2.5 $, 10);
+$VERSION =3D substr(q$Revision: 2.6 $, 10);
use strict;
=20
sub array {
@@ -122,14 +122,6 @@
$s->{mv_return_delim} =3D $s->{mv_index_delim}
unless defined $s->{mv_return_delim};
=20
- if(ref $s->{mv_range_look}) {
- unless( scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_min=
}}) and
- scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_max}}) ) {
- $s->{mv_search_warning}
- =3D "Must have min and max values for range -- aborting range look.";
- undef $s->{mv_range_look};
- }
- }
@specs =3D @{$s->{mv_searchspec}};
=20
@pats =3D $s->spec_check(@specs);
2.5 +2 -11 interchange/lib/Vend/RefSearch.pm
rev 2.5, prev_rev 2.4
Index: RefSearch.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/lib/Vend/RefSearch.pm,v
retrieving revision 2.4
retrieving revision 2.5
diff -u -r2.4 -r2.5
--- RefSearch.pm 23 Jun 2002 02:57:57 -0000 2.4
+++ RefSearch.pm 15 Jul 2002 13:41:12 -0000 2.5
@@ -1,6 +1,6 @@
# Vend::DbSearch - Search indexes with Interchange
#
-# $Id: RefSearch.pm,v 2.4 2002/06/23 02:57:57 edl Exp $
+# $Id: RefSearch.pm,v 2.5 2002/07/15 13:41:12 mheins Exp $
#
# Adapted for use with Interchange from Search::TextSearch
#
@@ -26,7 +26,7 @@
=20
@ISA =3D qw(Vend::Search);
=20
-$VERSION =3D substr(q$Revision: 2.4 $, 10);
+$VERSION =3D substr(q$Revision: 2.5 $, 10);
=20
use strict;
=20
@@ -126,15 +126,6 @@
=20
#::logDebug("Called RefSearch, object=3D" . ::uneval($s));
@specs =3D @{$s->{mv_searchspec}};
-
- if(ref $s->{mv_range_look}) {
- unless( scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_min=
}}) and
- scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_max}}) ) {
- $s->{mv_search_warning}
- =3D "Must have min and max values for range -- aborting range look.";
- undef $s->{mv_range_look};
- }
- }
=20
@pats =3D $s->spec_check(@specs);
=20
2.10 +2 -10 interchange/lib/Vend/TextSearch.pm
rev 2.10, prev_rev 2.9
Index: TextSearch.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /anon_cvs/repository/interchange/lib/Vend/TextSearch.pm,v
retrieving revision 2.9
retrieving revision 2.10
diff -u -r2.9 -r2.10
--- TextSearch.pm 23 Jun 2002 01:20:10 -0000 2.9
+++ TextSearch.pm 15 Jul 2002 13:41:12 -0000 2.10
@@ -1,6 +1,6 @@
# Vend::TextSearch - Search indexes with Perl
#
-# $Id: TextSearch.pm,v 2.9 2002/06/23 01:20:10 jon Exp $
+# $Id: TextSearch.pm,v 2.10 2002/07/15 13:41:12 mheins Exp $
#
# Adapted for use with Interchange from Search::TextSearch
#
@@ -28,7 +28,7 @@
use vars qw(@ISA);
@ISA =3D qw(Vend::Search);
=20
-$VERSION =3D substr(q$Revision: 2.9 $, 10);
+$VERSION =3D substr(q$Revision: 2.10 $, 10);
=20
use Search::Dict;
use strict;
@@ -140,14 +140,6 @@
$s->{mv_return_delim} =3D $s->{mv_index_delim}
unless defined $s->{mv_return_delim};
=20
- if(ref $s->{mv_range_look}) {
- unless( scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_min=
}}) and
- scalar(@{$s->{mv_range_look}}) =3D=3D scalar(@{$s->{mv_range_max}}) ) {
- $s->{mv_search_warning}
- =3D "Must have min and max values for range -- aborting range look.";
- undef $s->{mv_range_look};
- }
- }
@specs =3D @{$s->{mv_searchspec}};
=20
@pats =3D $s->spec_check(@specs);