[interchange-cvs] interchange - heins modified lib/Vend/Search.pm

interchange-core@icdevgroup.org interchange-core@icdevgroup.org
Mon Oct 28 15:50:00 2002


User:      heins
Date:      2002-10-28 20:46:30 GMT
Modified:  lib/Vend Search.pm
Log:
Minor debug improvment.

Revision  Changes    Path
2.15      +4 -4      interchange/lib/Vend/Search.pm


rev 2.15, prev_rev 2.14
Index: Search.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Search.pm,v
retrieving revision 2.14
retrieving revision 2.15
diff -u -r2.14 -r2.15
--- Search.pm	18 Oct 2002 07:10:46 -0000	2.14
+++ Search.pm	28 Oct 2002 20:46:30 -0000	2.15
@@ -1,6 +1,6 @@
 # Vend::Search - Base class for search engines
 #
-# $Id: Search.pm,v 2.14 2002/10/18 07:10:46 mheins Exp $
+# $Id: Search.pm,v 2.15 2002/10/28 20:46:30 mheins Exp $
 #
 # Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
 #
@@ -21,7 +21,7 @@
 
 package Vend::Search;
 
-$VERSION = substr(q$Revision: 2.14 $, 10);
+$VERSION = substr(q$Revision: 2.15 $, 10);
 
 use strict;
 use vars qw($VERSION);
@@ -149,10 +149,10 @@
 
 sub escape {
     my($s, @text) = @_;
-#::logDebug( "text=@text");
+#::logDebug( "escaped text=" . ::uneval(\@text));
 	return @text if ! $s->{mv_all_chars}[0];
 	@text = map {quotemeta $_} @text;
-#::logDebug( "text=@text");
+#::logDebug( "escaped text=" . ::uneval(\@text));
     return @text;
 }