diff options
| author | dakkar <dakkar@thenautilus.net> | 2023-12-09 14:05:34 +0000 |
|---|---|---|
| committer | dakkar <dakkar@thenautilus.net> | 2023-12-09 14:05:34 +0000 |
| commit | 808b2f67fce4fe9a68f3126be928dde63ffe9a08 (patch) | |
| tree | 819e651d6b9ee7cde159883444d229b4c7f55967 /lib/HomePanel | |
| parent | actually async (diff) | |
| download | HomePanel-808b2f67fce4fe9a68f3126be928dde63ffe9a08.tar.gz HomePanel-808b2f67fce4fe9a68f3126be928dde63ffe9a08.tar.bz2 HomePanel-808b2f67fce4fe9a68f3126be928dde63ffe9a08.zip | |
some clean
Diffstat (limited to 'lib/HomePanel')
| -rw-r--r-- | lib/HomePanel/AsyncUA.pm | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/lib/HomePanel/AsyncUA.pm b/lib/HomePanel/AsyncUA.pm deleted file mode 100644 index d74e4aa..0000000 --- a/lib/HomePanel/AsyncUA.pm +++ /dev/null @@ -1,32 +0,0 @@ -package HomePanel::AsyncUA; -use Moo; -use namespace::autoclean; -use Net::Async::HTTP; - -has loop => ( - is => 'ro', - required => 1, - weak => 1, -); - -has agent => ( - is => 'lazy', -); -sub _build_agent { - my ($self) = @_; - - my $agent = Net::Async::HTTP->new( - max_connections_per_host => 1, - stall_timeout => 10, - ); - $self->loop->add($agent); - return $agent; -} - -sub get { - my ($self,$uri) = @_; - - return $self->agent->GET($uri)->get -} - -1; |