Move assigning ua up because it gets used in guess_crednetials

This commit is contained in:
Isaac Connor
2025-11-11 15:54:49 -05:00
parent bf13d1e7ff
commit aaffd5822a

View File

@@ -52,17 +52,17 @@ sub open {
my $self = shift;
$self->loadMonitor();
use LWP::UserAgent;
$self->{ua} = LWP::UserAgent->new;
$self->{ua}->cookie_jar( {} );
$self->{ua}->agent('ZoneMinder Control Agent/'.ZoneMinder::Base::ZM_VERSION);
$self->{state} = 'closed';
my $uri = $self->guess_credentials();
$uri = new URI() if ! $uri;;
# For parent get
$$self{BaseURL} = $uri->canonical();
use LWP::UserAgent;
$self->{ua} = LWP::UserAgent->new;
$self->{ua}->cookie_jar( {} );
$self->{ua}->agent('ZoneMinder Control Agent/'.ZoneMinder::Base::ZM_VERSION);
$self->{state} = 'closed';
my $realm = $self->{Monitor}->{ControlDevice};