Changeset c6adf17 for perl/modules/Twitter

Timestamp:

Oct 1, 2010, 9:22:20 PM (14 years ago)

Author:

David Benjamin <davidben@mit.edu>

Branches:

master, release-1.10, release-1.7, release-1.8, release-1.9

Children:

afaef6e

Parents:

385cce2

git-author:

David Benjamin <davidben@mit.edu> (09/25/10 02:02:45)

git-committer:

David Benjamin <davidben@mit.edu> (10/01/10 21:22:20)

Message:

Track names along with timers, add :show timers

This will help people with BarnOwls eating CPU to diagnose timer leaks.

File:

• perl/modules/Twitter/lib/BarnOwl/Module/Twitter/Handle.pm (modified) (2 diffs)

perl/modules/Twitter/lib/BarnOwl/Module/Twitter/Handle.pm

@@ -160 +160 @@
     }
 
+    my $nickname = $self->{cfg}->{account_nickname};
     if($self->{cfg}->{poll_for_tweets}) {
         $self->{timer} = BarnOwl::Timer->new({
+            name     => "Twitter ($nickname) poll_for_tweets",
             after    => $delay,
             interval => 90,
@@ -170 +172 @@
     if($self->{cfg}->{poll_for_dms}) {
         $self->{direct_timer} = BarnOwl::Timer->new({
+            name     => "Twitter ($nickname) poll_for_dms",
             after    => $delay,
             interval => 180,