Skip to content

Commit 4089d45

Browse files
author
Dan Boger
committed
1.7.4 - r358 - Remove ban on JSON::XS
1 parent 8bfb860 commit 4089d45

File tree

1 file changed

+8
-14
lines changed

1 file changed

+8
-14
lines changed

twirssi.pl

Lines changed: 8 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -6,20 +6,13 @@
66
use File::Temp;
77
use LWP::Simple;
88
use Data::Dumper;
9+
use Net::Twitter;
910
$Data::Dumper::Indent = 1;
1011

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-
1912
use vars qw($VERSION %IRSSI);
2013

21-
$VERSION = "1.7.3";
22-
my ($REV) = '$Rev: 354 $' =~ /(\d+)/;
14+
$VERSION = "1.7.4";
15+
my ($REV) = '$Rev: 358 $' =~ /(\d+)/;
2316
%IRSSI = (
2417
authors => 'Dan Boger',
2518
contact => 'zigdon@gmail.com',
@@ -28,7 +21,7 @@ BEGIN
2821
. 'Can optionally set your bitlbee /away message to same',
2922
license => 'GNU GPL v2',
3023
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) $',
3225
);
3326

3427
my $window;
@@ -907,9 +900,10 @@ sub event_send_text {
907900

908901
# if the window where we got our text was the twitter window, and the user
909902
# 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 );
913907
}
914908
}
915909

0 commit comments

Comments
 (0)