Subject: | SimpleDB::Class::Domain breaks when using consistent option |
I need to use the consistent option in my project but the module breaks,
unless I patch it.
Tested on:
- debian 2.6.32-5-amd64
- perl 5.10.1
- module version 1.0503
Here is my patch:
*** /usr/local/share/perl/5.10.1/SimpleDB/Class/Domain.pm
2013-01-17 11:01:33.000000000 +0200
--- /home/ovidiu/tmp/Domain_mod.pm 2013-01-17 10:58:31.000000000
+0200
***************
*** 170,175 ****
--- 170,179 ----
$params{ConsistentRead} = 'true';
}
my $result = $db->http->send_request('GetAttributes',
\%params);
+
+ # If the consistent option is set and the item is not
found
+ return $item unless ($result->{GetAttributesResult});
+
$item = $self->parse_item($id,
$result->{GetAttributesResult}{Attribute});
if (defined $item) {
$cache->set($name, $id, $item->to_hashref);