From: mitty Date: Mon, 10 Jan 2011 10:35:17 +0000 (+0000) Subject: * save status.yml only when new tweets were found X-Git-Url: http://lab.mitty.jp/git/?a=commitdiff_plain;h=b9060c88e64ce10e6c11cdb9c3a5552c91640aaa;p=lab.git * save status.yml only when new tweets were found git-svn-id: https://lab.mitty.jp/svn/lab/trunk@106 7d2118f6-f56c-43e7-95a2-4bb3031d96e7 --- diff --git a/Dev/twitter/twitterbot.pl b/Dev/twitter/twitterbot.pl index 3923a6b..ae37ea6 100755 --- a/Dev/twitter/twitterbot.pl +++ b/Dev/twitter/twitterbot.pl @@ -143,7 +143,7 @@ if ($conf->{mail}{body}) { DEBUG or sendmail(%mail) or warn "Error sending mail: $Mail::Sendmail::error\n"; } -if ($tweets) { +if (ref $tweets and keys %{$tweets}) { # save last status to yaml file DEBUG or YAML::Tiny::DumpFile("$Bin/status.yml", $stat); DEBUG and warn "status.yml => ", Dumper($stat);