oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Merge branch 'memcached' of github.com:plainblack/webgui into memcached

Browse source
This commit is contained in:
JT Smith 2009-09-24 22:47:01 -05:00
commit eff27a141d
1 changed files with 2 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/WebGUI/Cache.pm
View file

@ -132,13 +132,10 @@ An array reference of keys to retrieve.
sub mget { sub mget {
my ($self, $names) = @_; my ($self, $names) = @_;
my @parsedNames = (); my @parsedNames = map { $self->parseKey($_) } @{ $names };
foreach my $name (@{$names}) {
push @parsedNames, $self->parseKey($name);
}
my %result; my %result;
$self->getMemcached->mget_into_hashref(\@parsedNames, \%result); $self->getMemcached->mget_into_hashref(\@parsedNames, \%result);
my @values = (); my @values;
foreach my $name (@parsedNames) { foreach my $name (@parsedNames) {
my $content = Storable::thaw($result{$name}); my $content = Storable::thaw($result{$name});
next unless ref $content; next unless ref $content;