diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-07-02 02:47:17 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-07-02 02:47:17 -0400 |
commit | 62873e077363d0ea19351df5d88277af3589f39e (patch) | |
tree | 5667c582ca456195ddef5ffdc6401c9d4ebe00c0 /lib/Reply/Plugin/Autocomplete/Packages.pm | |
parent | 444d04382708f5018f672495bcc539b65838555d (diff) | |
download | reply-62873e077363d0ea19351df5d88277af3589f39e.tar.gz reply-62873e077363d0ea19351df5d88277af3589f39e.zip |
clean up some more tab completion stuff
Diffstat (limited to 'lib/Reply/Plugin/Autocomplete/Packages.pm')
-rw-r--r-- | lib/Reply/Plugin/Autocomplete/Packages.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Reply/Plugin/Autocomplete/Packages.pm b/lib/Reply/Plugin/Autocomplete/Packages.pm index 6e6037d..c0a81a9 100644 --- a/lib/Reply/Plugin/Autocomplete/Packages.pm +++ b/lib/Reply/Plugin/Autocomplete/Packages.pm @@ -27,6 +27,7 @@ sub tab_handler { # $module_name_rx does not permit trailing :: my ($before, $package_fragment) = $line =~ /(.*?)(${module_name_rx}:?:?)$/; return unless $package_fragment; + return if $before =~ /->\s*$/; # method call return if $before =~ /[\$\@\%\&\*]\s*$/; my $file_fragment = $package_fragment; |