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

Stefan Hornburg <[email protected]>
Newsgroups gmane.comp.web.interchange.cvs
Message-ID <[email protected]>
commit 33f8140c322a3a4cc85d5baaf129917481d17dd6
Author: Stefan Hornburg (Racke) <[email protected]>
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 ||= {};
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.