[Haver-commits] r202 - in trunk/haver-gtk/lib/Haver/Client/Gtk: . Page

[haver]

Author: bdonlan
Date: 2004-05-30 17:49:57 -0400 (Sun, 30 May 2004)
New Revision: 202

Modified:
   trunk/haver-gtk/lib/Haver/Client/Gtk/Page.pm
   trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Channel.pm
   trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Query.pm
   trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Rawlog.pm
Log:
Rename _object_events to _object_states to match POE::Session->create()

Modified: trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Channel.pm
===================================================================
--- trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Channel.pm        2004-05-30 
21:29:06 UTC (rev 201)
+++ trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Channel.pm        2004-05-30 
21:49:57 UTC (rev 202)
@@ -72,7 +72,7 @@
 
 ### METHODS
 
-sub _object_events {
+sub _object_states {
        my ($self, $ehash) = @_;
        $ehash = {qw{
                haver_joined            _joined
@@ -87,7 +87,7 @@
                %$ehash,
        };
        
-       return $self->SUPER::_object_events($ehash);
+       return $self->SUPER::_object_states($ehash);
 }
 
 sub new ($$) {

Modified: trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Query.pm
===================================================================
--- trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Query.pm  2004-05-30 21:29:06 UTC 
(rev 201)
+++ trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Query.pm  2004-05-30 21:49:57 UTC 
(rev 202)
@@ -32,7 +32,7 @@
 
 ### METHODS
 
-sub _object_events {
+sub _object_states {
        my ($self, $ehash) = @_;
        $ehash = {
                qw{
@@ -42,7 +42,7 @@
                }, # qw{
                %$ehash,
        };
-       return $self->SUPER::_object_events($ehash);
+       return $self->SUPER::_object_states($ehash);
 }
 
 sub _collect_warnings {

Modified: trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Rawlog.pm
===================================================================
--- trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Rawlog.pm 2004-05-30 21:29:06 UTC 
(rev 201)
+++ trunk/haver-gtk/lib/Haver/Client/Gtk/Page/Rawlog.pm 2004-05-30 21:49:57 UTC 
(rev 202)
@@ -26,7 +26,7 @@
 
 ### METHODS
 
-sub _object_events {
+sub _object_states {
        my ($self, $ehash) = @_;
        $ehash = {
                qw{
@@ -35,7 +35,7 @@
                }, # qw{
                %$ehash,
        };
-       return $self->SUPER::_object_events($ehash);
+       return $self->SUPER::_object_states($ehash);
 }
 
 sub new {

Modified: trunk/haver-gtk/lib/Haver/Client/Gtk/Page.pm
===================================================================
--- trunk/haver-gtk/lib/Haver/Client/Gtk/Page.pm        2004-05-30 21:29:06 UTC 
(rev 201)
+++ trunk/haver-gtk/lib/Haver/Client/Gtk/Page.pm        2004-05-30 21:49:57 UTC 
(rev 202)
@@ -30,7 +30,7 @@
 
 ### OVERRIDABLE METHODS
 
-sub _object_events {
+sub _object_states {
        my ($self, $ehash) = @_;
        $ehash = {qw{
                _start                          _start
@@ -85,11 +85,11 @@
                name => $title,
        };
        bless $self, $class;
-       my $oe = $self->_object_events({});
+       my $oe = $self->_object_states({});
        print Dumper $oe;
        $self->{session} = POE::Session->create(
                object_states => [
-               $self => $self->_object_events({}),
+               $self => $self->_object_states({}),
                ], # object_states => [
        )->ID;