File tree Expand file tree Collapse file tree 1 file changed +8
-14
lines changed Expand file tree Collapse file tree 1 file changed +8
-14
lines changed Original file line number Diff line number Diff line change 6
6
use File::Temp;
7
7
use LWP::Simple;
8
8
use Data::Dumper;
9
+ use Net::Twitter;
9
10
$Data::Dumper::Indent = 1;
10
11
11
- BEGIN {
12
- $ENV {JSON_ANY_ORDER } = " JSON Syck DWIW" ;
13
- require JSON::Any;
14
- import JSON::Any;
15
- require Net::Twitter;
16
- import Net::Twitter;
17
- }
18
-
19
12
use vars qw( $VERSION %IRSSI) ;
20
13
21
- $VERSION = " 1.7.3 " ;
22
- my ($REV ) = ' $Rev: 354 $' =~ / (\d +)/ ;
14
+ $VERSION = " 1.7.4 " ;
15
+ my ($REV ) = ' $Rev: 358 $' =~ / (\d +)/ ;
23
16
%IRSSI = (
24
17
authors => ' Dan Boger' ,
25
18
contact => ' zigdon@gmail.com' ,
28
21
. ' Can optionally set your bitlbee /away message to same' ,
29
22
license => ' GNU GPL v2' ,
30
23
url => ' http://tinyurl.com/twirssi' ,
31
- changed => ' $Date: 2009-01-08 14:46:04 -0800 (Thu, 08 Jan 2009) $' ,
24
+ changed => ' $Date: 2009-01-13 21:02:17 -0800 (Tue, 13 Jan 2009) $' ,
32
25
);
33
26
34
27
my $window ;
@@ -907,9 +900,10 @@ sub event_send_text {
907
900
908
901
# if the window where we got our text was the twitter window, and the user
909
902
# wants to be lazy, tweet away!
910
- if ( ($awin -> get_active_name() eq $window -> {name })
911
- and Irssi::settings_get_bool(" tweet_window_input" ) ) {
912
- &cmd_tweet($line , $server , $win );
903
+ if ( ( $awin -> get_active_name() eq $window -> {name } )
904
+ and Irssi::settings_get_bool(" tweet_window_input" ) )
905
+ {
906
+ &cmd_tweet( $line , $server , $win );
913
907
}
914
908
}
915
909
You can’t perform that action at this time.
0 commit comments