diff options
| -rw-r--r-- | lib/Reply/Plugin/Autocomplete/Lexicals.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Reply/Plugin/Autocomplete/Lexicals.pm b/lib/Reply/Plugin/Autocomplete/Lexicals.pm index ebefce6..08d4c02 100644 --- a/lib/Reply/Plugin/Autocomplete/Lexicals.pm +++ b/lib/Reply/Plugin/Autocomplete/Lexicals.pm @@ -19,7 +19,7 @@ Perl code. =cut # XXX unicode? -my $var_name_rx = qr/[\$\@\%]([A-Z_a-z][0-9A-Z_a-z]*)?/; +my $var_name_rx = qr/[\$\@\%]\s*(?:[A-Z_a-z][0-9A-Z_a-z]*)?/; sub new { my $class = shift; |