From cf4edf5661ed8cfaa392e5ee63b0d75a70ac0c87 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Fri, 31 May 2013 03:10:51 -0500 Subject: display the variable it's stored in when using the result cache --- lib/Reply/Plugin/ResultCache.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/lib/Reply/Plugin/ResultCache.pm b/lib/Reply/Plugin/ResultCache.pm index 517c539..b43eff3 100644 --- a/lib/Reply/Plugin/ResultCache.pm +++ b/lib/Reply/Plugin/ResultCache.pm @@ -38,4 +38,11 @@ sub execute { return @res; } +sub mangle_result { + my $self = shift; + my ($result) = @_; + + return '$res[' . $#{ $self->{results} } . '] = ' . $result; +} + 1; -- cgit v1.2.3-54-g00ecf