oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed: Warnings about API changes in POE::Component::IKC::ClientLite

Browse source
This commit is contained in:
colin 2017-05-09 13:37:55 -07:00
parent 94f1f3506c
commit c75ef5e044
6 changed files with 12 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

3
docs/changelog/7.x.x.txt
View file

@ -1,3 +1,6 @@
7.10.31
- fixed: Warnings about API changes in POE::Component::IKC::ClientLite
7.10.30
- fixed: Do not generate the Not Found page when JS or CSS is requested. In admin mode, this is bypassed so that admins can see which pages are really missing and can easily add them.
- fixed: Allow IS NULL/IS NOT NULL queries in the Asset Report.

4
lib/WebGUI/Operation/Spectre.pm
View file

@ -119,7 +119,7 @@ sub www_spectreStatus {
$session->http->setCacheControl("none");
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$session->config->get("spectrePort"),
ip=>$session->config->get("spectreIp"),
name=>rand(100000),
@ -203,7 +203,7 @@ do subnet checking, yet.
sub spectreTest{
my $session = shift;
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$session->config->get("spectrePort"),
ip=>$session->config->get("spectreIp"),
name=>rand(100000),

4
lib/WebGUI/Operation/Workflow.pm
View file

@ -318,7 +318,7 @@ sub www_editWorkflowPriority {
}
# make the request
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$session->config->get("spectrePort"),
ip=>$session->config->get("spectreIp"),
name=>rand(100000),
@ -560,7 +560,7 @@ sub www_showRunningWorkflows {
</script>
ENDCODE
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$session->config->get("spectrePort"),
ip=>$session->config->get("spectreIp"),
name=>rand(100000),

2
lib/WebGUI/Workflow/Spectre.pm
View file

@ -72,7 +72,7 @@ sub notify {
my $module = shift;
my $params = shift;
my ($config, $error) = $self->session->quick("config", "errorHandler");
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$config->get("spectrePort"),
ip=>$config->get("spectreIp"),
name=> (time() . int(rand(10000000))),

4
sbin/spectre.pl
View file

@ -145,7 +145,7 @@ elsif ($daemon) {
}
sub ping {
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$config->get("port"),
ip=>$config->get("ip"),
name=>rand(100000),
@ -161,7 +161,7 @@ sub ping {
}
sub getStatusReport {
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port=>$config->get("port"),
ip=>$config->get("ip"),
name=>rand(100000),

4
t/Spectre/Workflow.t
View file

@ -64,7 +64,7 @@ SKIP: {
},
);
$instance->start;
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port => $port,
ip => $ip,
name => rand(100000),
@ -104,7 +104,7 @@ TODO: {
sub spectre_ping {
my $spectreConfig = shift;
my $remote = create_ikc_client(
my $remote = POE::Component::IKC::ClientLite->spawn(
port => $spectreConfig->get("port"),
ip => $spectreConfig->get("ip"),
name => rand(100000),