From d2f53eac09735b075b640217f197c2423955e749 Mon Sep 17 00:00:00 2001 From: Dan Boger Date: Thu, 8 Jan 2009 12:51:18 -0800 Subject: [PATCH] 1.6.1 - r337 - Fix missing ; in print statements --- twirssi.pl | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/twirssi.pl b/twirssi.pl index 8f7f966..4a6b5dd 100644 --- a/twirssi.pl +++ b/twirssi.pl @@ -12,7 +12,7 @@ $Data::Dumper::Indent = 1; use vars qw($VERSION %IRSSI); $VERSION = "1.6.1"; -my ($REV) = '$Rev: 336 $' =~ /(\d+)/; +my ($REV) = '$Rev: 337 $' =~ /(\d+)/; %IRSSI = ( authors => 'Dan Boger', contact => 'zigdon@gmail.com', @@ -651,8 +651,8 @@ sub do_updates { }; if ($@) { - printf $fh "type:error Error during friends_timeline call. Aborted.\n" - return; + print $fh "type:error Error during friends_timeline call. Aborted.\n"; + return; } foreach my $t ( reverse @$tweets ) { @@ -691,10 +691,11 @@ sub do_updates { eval { $tweets = $obj->replies( { since => HTTP::Date::time2str($last_poll) } ) || []; - } + }; - if ($@) { - printf $fh "type:error Error during replies call. Aborted.\n" return; + if ($@) { + print $fh "type:error Error during replies call. Aborted.\n"; + return; } foreach my $t ( reverse @$tweets ) { -- 2.39.5