Author: spadkins
Date: Sat Apr 8 08:43:39 2006
New Revision: 5876
Added:
p5ee/trunk/App-Context/lib/App/Context/ClusterController.pm
- copied, changed from r5875,
/p5ee/trunk/App-Context/lib/App/Context/Cluster.pm
Removed:
p5ee/trunk/App-Context/lib/App/Context/Cluster.pm
Log:
rename Cluster.pm to ClusterController.pm
Copied: p5ee/trunk/App-Context/lib/App/Context/ClusterController.pm (from
r5875, /p5ee/trunk/App-Context/lib/App/Context/Cluster.pm)
==============================================================================
--- /p5ee/trunk/App-Context/lib/App/Context/Cluster.pm (original)
+++ p5ee/trunk/App-Context/lib/App/Context/ClusterController.pm Sat Apr 8
08:43:39 2006
@@ -3,7 +3,7 @@
## $Id$
#############################################################################
-package App::Context::Cluster;
+package App::Context::ClusterController;
$VERSION = (q$Revision$ =~ /(\d[\d\.]*)/)[0]; # VERSION numbers generated by
svn
use App;
@@ -17,7 +17,7 @@
=head1 NAME
-App::Context::Cluster - a runtime environment of a Cluster Controller served
by many Cluster Nodes
+App::Context::ClusterController - a runtime environment of a Cluster
Controller served by many Cluster Nodes
=head1 SYNOPSIS
@@ -28,8 +28,8 @@
$config->dispatch_events(); # dispatch events
# ... alternative way (used internally) ...
- use App::Context::Cluster;
- $context = App::Context::Cluster->new();
+ use App::Context::ClusterController;
+ $context = App::Context::ClusterController->new();
=cut
@@ -38,7 +38,7 @@
my ($self, $options) = @_;
die "Controller must have a port defined (\$context->{options}{port})" if
(!$self->{port});
$self->{num_node_events} = 0;
- $self->{max_node_events} =
$self->{options}{"App.Context.Cluster.max_node_events"} || 10;
+ $self->{max_node_events} =
$self->{options}{"app.context.cluster_controller.max_node_events"} || 10;
&App::sub_exit() if ($App::trace);
}