[interchange] Fix bug with composite keys and options in the $key argument in the

Stefan Hornburg interchange-cvs at icdevgroup.org
Thu Jun 17 11:27:09 UTC 2010


commit 33f8140c322a3a4cc85d5baaf129917481d17dd6
Author: Stefan Hornburg (Racke) <racke at linuxia.de>
Date:   Thu Jun 17 13:25:20 2010 +0200

    Fix bug with composite keys and options in the $key argument in the
    set_slice method.

 lib/Vend/Table/DBI_CompositeKey.pm |    1 -
 1 files changed, 0 insertions(+), 1 deletions(-)
---
diff --git a/lib/Vend/Table/DBI_CompositeKey.pm b/lib/Vend/Table/DBI_CompositeKey.pm
index b3b8d42..e7f9ea6 100644
--- a/lib/Vend/Table/DBI_CompositeKey.pm
+++ b/lib/Vend/Table/DBI_CompositeKey.pm
@@ -320,7 +320,6 @@ sub set_slice {
 	my $opt;
 	if (ref ($key) eq 'ARRAY' && ref ($key->[0]) eq 'HASH') {
 		$opt = shift @$key;
-		$key = shift @$key;
 	}
 	$opt ||= {};
 



More information about the interchange-cvs mailing list