diff options
author | Yorhel <git@yorhel.nl> | 2014-10-22 16:36:22 +0200 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2014-10-22 16:36:22 +0200 |
commit | 46ce00029e3c6f00f801ec0dc9be84db864df6df (patch) | |
tree | 240dd37f59326be49ccc2641b51ecefdbd174f4b /lib/Multi/Core.pm | |
parent | a93452019f0a3bf84b13bcc637765c56f6dd18a4 (diff) |
Multi::RG: Converted to use AnyEvent
AnyEvent::Util::run_cmd() is a godsent. POE was such a hassle in that
area.
Diffstat (limited to 'lib/Multi/Core.pm')
-rw-r--r-- | lib/Multi/Core.pm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lib/Multi/Core.pm b/lib/Multi/Core.pm index 38228631..478b6b28 100644 --- a/lib/Multi/Core.pm +++ b/lib/Multi/Core.pm @@ -159,7 +159,7 @@ sub pg_expect { AE::log alert => !$res ? sprintf 'AnyEvent::Pg error at %s', $loc : $res->errorMessage ? sprintf 'SQL error at %s: %s', $loc, $res->errorMessage - : sprintf 'Unexpected status at : %s', $loc, $res->statusMessage; + : sprintf 'Unexpected status at %s: %s', $loc, $res->statusMessage; return 1; } @@ -204,10 +204,6 @@ use base 'Tie::Handle'; sub TIEHANDLE { return bless \"$_[1]", $_[0] } sub WRITE { my($s, $msg) = @_; - # Surpress warning about STDIO being tied in POE::Wheel::Run::new(). - # the untie() is being performed in the child process, which doesn't effect - # the parent process, so the tie() will still be in place where we want it. - #return if $msg =~ /^Cannot redirect into tied STD(?:ERR|OUT)\. Untying it/; AE::log warn => "$$s: $msg"; } |