diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-09-27 15:33:14 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-09-27 15:33:14 -0400 |
commit | 59a6f171fa2a70d5210acec086010f292ee4c592 (patch) | |
tree | 2d11b9987d8ee06eba829776f66ec5c22e42264b | |
parent | b27e1fc2fba43d908d4e02b22729506190cebd23 (diff) | |
download | reply-59a6f171fa2a70d5210acec086010f292ee4c592.tar.gz reply-59a6f171fa2a70d5210acec086010f292ee4c592.zip |
Revert "temporarily rename this variable until p5-mop is fixed"
This reverts commit b27e1fc2fba43d908d4e02b22729506190cebd23.
-rw-r--r-- | lib/Reply/Plugin/Autocomplete/Methods.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/Reply/Plugin/Autocomplete/Methods.pm b/lib/Reply/Plugin/Autocomplete/Methods.pm index 98cdd41..f1fd8b0 100644 --- a/lib/Reply/Plugin/Autocomplete/Methods.pm +++ b/lib/Reply/Plugin/Autocomplete/Methods.pm @@ -31,7 +31,7 @@ class Reply::Plugin::Autocomplete::Methods extends Reply::Plugin { $method_prefix = '' unless defined $method_prefix; - my $klass; + my $class; if ($invocant =~ /^\$/) { # XXX should support globals here my $env = { @@ -39,14 +39,14 @@ class Reply::Plugin::Autocomplete::Methods extends Reply::Plugin { }; my $var = $env->{$invocant}; return unless $var && ref($var) eq 'REF' && blessed($$var); - $klass = blessed($$var); + $class = blessed($$var); } else { - $klass = $invocant; + $class = $invocant; } my @results; - for my $method (methods($klass)) { + for my $method (methods($class)) { push @results, $method if index($method, $method_prefix) == 0; } |