diff options
| author | Stevan Little <stevan.little@iinteractive.com> | 2013-09-01 13:27:33 -0400 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2013-09-03 16:50:15 -0400 |
| commit | 30d7375bba8b179dedf1c2ca322d758e5330752d (patch) | |
| tree | 62427ef686e6f6576a5035887813050faad2fa31 /lib/Reply/Plugin/FancyPrompt.pm | |
| parent | 5da5169c7fa1a64b9ddc2eae14d9435cc54f107a (diff) | |
| download | reply-30d7375bba8b179dedf1c2ca322d758e5330752d.tar.gz reply-30d7375bba8b179dedf1c2ca322d758e5330752d.zip | |
twigils
Diffstat (limited to 'lib/Reply/Plugin/FancyPrompt.pm')
| -rw-r--r-- | lib/Reply/Plugin/FancyPrompt.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/Reply/Plugin/FancyPrompt.pm b/lib/Reply/Plugin/FancyPrompt.pm index c074bff..42c453b 100644 --- a/lib/Reply/Plugin/FancyPrompt.pm +++ b/lib/Reply/Plugin/FancyPrompt.pm @@ -19,17 +19,17 @@ current session. =cut class Reply::Plugin::FancyPrompt extends Reply::Plugin { - has $counter = 0; - has $prompted = 0; + has $!counter = 0; + has $!prompted = 0; method prompt ($next) { - $prompted = 1; - return $counter . $next->(); + $!prompted = 1; + return $!counter . $next->(); } method loop ($continue) { - $counter++ if $prompted; - $prompted = 0; + $!counter++ if $!prompted; + $!prompted = 0; $continue; } } |