Changeset 40c9dac

Timestamp:

Dec 27, 2009, 3:05:53 PM (15 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

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

Children:

c9bdb46

Parents:

f2adf6c

Message:

Kill some defunct variables.

File:

• lib/BarnOwl/Module/Twitter.pm (modified) (5 diffs)

lib/BarnOwl/Module/Twitter.pm

@@ -26 +26 @@
 our @twitter_handles = ();
 our $default_handle = undef;
-my $class    = $ENV{USER};
-my $instance = "status";
-my $opcode   = "twitter";
-my $use_reply_to = 0;
-my $next_service_to_poll = 0;
 
 my $desc = <<'END_DESC';
@@ -43 +38 @@
     'twitter:class',
     {
-        default     => $class,
+        default     => $ENV{USER},
         summary     => 'Class to watch for Twitter messages',
         description => $desc
@@ -51 +46 @@
     'twitter:instance',
     {
-        default => $instance,
+        default => 'status',
         summary => 'Instance on twitter:class to watch for Twitter messages.',
         description => $desc
@@ -59 +54 @@
     'twitter:opcode',
     {
-        default => $opcode,
+        default => 'twitter',
         summary => 'Opcode for zephyrs that will be sent as twitter updates',
         description => $desc
@@ -174 +169 @@
 sub handle_message {
     my $m = shift;
-    ($class, $instance, $opcode) = map{BarnOwl::getvar("twitter:$_")} qw(class instance opcode);
+    my ($class, $instance, $opcode) = map{BarnOwl::getvar("twitter:$_")} qw(class instance opcode);
     if($m->type eq 'zephyr'
        && $m->sender eq BarnOwl::zephyr_getsender()