Small speedup on hits

nigelhorne · Nov 20, 2019 · c86f490 · c86f490
1 parent 707d899
commit c86f490
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Class/Simple/Readonly/Cached.pm b/lib/Class/Simple/Readonly/Cached.pm
@@ -142,7 +142,6 @@ sub AUTOLOAD {
 
 	# my $func = $self->{'object'} . "::$param";
 	my $func = $param;
-	my $object = $self->{'object'};
 
 	# if($param =~ /^[gs]et_/) {
 		# # $param = "SUPER::$param";
@@ -180,6 +179,7 @@ sub AUTOLOAD {
 		}
 	}
 	$self->{_misses}{$key}++;
+	my $object = $self->{'object'};
 	if(wantarray) {
 		my @rc = $object->$func(@_);
 		if(scalar(@rc) == 0) {