[interchange-cvs] interchange - jason modified lib/Vend/DbSearch.pm

interchange-core@interchange.redhat.com interchange-core@interchange.redhat.com
Tue Jan 22 16:39:00 2002


User:      jason
Date:      2002-01-22 21:38:28 GMT
Modified:  lib/Vend DbSearch.pm
Log:
Attempt to make some kind of sense out of the 'valid database reference' error.

Revision  Changes    Path
2.7       +3 -3      interchange/lib/Vend/DbSearch.pm


rev 2.7, prev_rev 2.6
Index: DbSearch.pm
===================================================================
RCS file: /anon_cvs/repository/interchange/lib/Vend/DbSearch.pm,v
retrieving revision 2.6
retrieving revision 2.7
diff -u -r2.6 -r2.7
--- DbSearch.pm	2001/12/29 19:49:33	2.6
+++ DbSearch.pm	2002/01/22 21:38:28	2.7
@@ -1,6 +1,6 @@
 # Vend::DbSearch - Search indexes with Interchange
 #
-# $Id: DbSearch.pm,v 2.6 2001/12/29 19:49:33 mheins Exp $
+# $Id: DbSearch.pm,v 2.7 2002/01/22 21:38:28 jason Exp $
 #
 # Adapted for use with Interchange from Search::TextSearch
 #
@@ -26,7 +26,7 @@
 
 @ISA = qw(Vend::Search);
 
-$VERSION = substr(q$Revision: 2.6 $, 10);
+$VERSION = substr(q$Revision: 2.7 $, 10);
 
 use Search::Dict;
 use strict;
@@ -142,7 +142,7 @@
 #::logDebug("searching $searchfiles[0], keys  after=" . join ",", grep /backup/, keys %{$Vend::Cfg->{Database}});
 	if(! $dbref) {
 		return $s->search_error(
-			"your search file a valid database reference, was '$searchfiles[0]'."
+			"search file '$searchfiles[0]' is not a valid database reference."
 			);
 	}
 	$s->{dbref} = $dbref;