[interchange-cvs] interchange - jon modified lib/Vend/Options/Matrix.pm

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Mon Jul 19 18:24:17 EDT 2004


User:      jon
Date:      2004-07-19 22:24:17 GMT
Modified:  lib/Vend/Options Matrix.pm
Log:
Remove unneeded sku check, leftover from 4.8 options (when there were
different types of rows).

Revision  Changes    Path
1.8       +3 -5      interchange/lib/Vend/Options/Matrix.pm


rev 1.8, prev_rev 1.7
Index: Matrix.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Options/Matrix.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -u -r1.7 -r1.8
--- Matrix.pm	8 Jan 2004 22:36:31 -0000	1.7
+++ Matrix.pm	19 Jul 2004 22:24:17 -0000	1.8
@@ -1,6 +1,6 @@
 # Vend::Options::Matrix - Interchange Matrix product options
 #
-# $Id: Matrix.pm,v 1.7 2004/01/08 22:36:31 mheins Exp $
+# $Id: Matrix.pm,v 1.8 2004/07/19 22:24:17 jon Exp $
 #
 # Copyright (C) 2002-2003 Mike Heins <mikeh at perusion.net>
 # Copyright (C) 2002-2003 Interchange Development Group <interchange at icdevgroup.org>
@@ -23,7 +23,7 @@
 
 package Vend::Options::Matrix;
 
-$VERSION = substr(q$Revision: 1.7 $, 10);
+$VERSION = substr(q$Revision: 1.8 $, 10);
 
 =head1 NAME
 
@@ -275,15 +275,13 @@
 		for(qw/code description price/) {
 			push @rf, ($map->{$_} || $_);
 		}
-		my $ccol = $map->{code} || 'code';
-		my $cval = $vdb->quote("$sku-%");
 		my $lcol = $map->{sku} || 'sku';
 		my $lval = $vdb->quote($sku, $lcol);
 
 		my $vname = $vdb->name();
 
 		my $q = "SELECT " . join(",", @rf);
-		$q .= " FROM $vname where $lcol = $lval AND $ccol like $cval $rsort";
+		$q .= " FROM $vname WHERE $lcol = $lval $rsort";
 #::logDebug("tag_options matrix query: $q");
 		my $ary = $vdb->query($q); 
 #::logDebug("tag_options matrix ary: " . ::uneval($ary));








More information about the interchange-cvs mailing list