summaryrefslogtreecommitdiff
path: root/src/Agent.pm
diff options
context:
space:
mode:
Diffstat (limited to 'src/Agent.pm')
-rw-r--r--src/Agent.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Agent.pm b/src/Agent.pm
index 44c72ff..740d58e 100644
--- a/src/Agent.pm
+++ b/src/Agent.pm
@@ -206,7 +206,7 @@ sub stopPbAnim {
undef $self->{afterid};
}
-}
+} # end stopPbAnim
sub pb {
my $self = shift;
@@ -376,7 +376,7 @@ sub _cbOnPress {
$self->{label}->configure(-foreground => $hlbg);
if ($self->{status} > 0) {
IvyIO::kill($self->{appname});
- $self->StopPbAnim;
+ $self->stopPbAnim;
$mw->after(400, sub {$self->{label}->configure(-foreground => $fg);});
} elsif ($self->{command}) {
my ($x, $y) = ($self->{label}->rootx, $self->{label}->rooty);