improved get command to use the user agent of the application

mojolicious · Jan 14, 2015 · fe192a0 · fe192a0
1 parent 0283ada
commit fe192a0
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/Changes b/Changes
@@ -7,6 +7,7 @@
   - Removed deprecated support for data arguments from Mojo::JSON::Pointer.
   - Removed deprecated AUTOLOAD and pluck methods from Mojo::Collection.
   - Removed deprecated AUTOLOAD and val methods from Mojo::DOM.
+  - Improved get command to use the user agent of the application.
   - Fixed JSON Pointer escaping bug.
   - Fixed portability bug in monkey_patch tests.
 

diff --git a/lib/Mojolicious/Command/get.pm b/lib/Mojolicious/Command/get.pm
@@ -6,7 +6,6 @@ use Mojo::DOM;
 use Mojo::IOLoop;
 use Mojo::JSON qw(encode_json j);
 use Mojo::JSON::Pointer;
-use Mojo::UserAgent;
 use Mojo::Util qw(decode encode);
 use Scalar::Util 'weaken';
 
@@ -32,8 +31,9 @@ sub run {
   my %headers = map { /^\s*([^:]+)\s*:\s*(.+)$/ ? ($1, $2) : () } @headers;
 
   # Detect proxy for absolute URLs
-  my $ua = Mojo::UserAgent->new(ioloop => Mojo::IOLoop->singleton);
-  $url !~ m!^/! ? $ua->proxy->detect : $ua->server->app($self->app);
+  my $ua = $self->app->ua->ioloop(Mojo::IOLoop->singleton);
+  $ua->server->ioloop(Mojo::IOLoop->singleton);
+  $ua->proxy->detect unless $url !~ m!^/!;
   $ua->max_redirects(10) if $redirect;
 
   my $buffer = '';