[haver-commits] r769 - in trunk: . main/server/lib/Haver/Server/Entity

[haver]

Author: dylan
Date: 2005-06-16 04:52:57 -0400 (Thu, 16 Jun 2005)
New Revision: 769

Modified:
   trunk/
   trunk/main/server/lib/Haver/Server/Entity/Lobby.pm
Log:
 [EMAIL PROTECTED]:  dylan | 2005-06-16 04:40:03 -0400
 &lobby no longer shows up in contents().
 new constant method lobby() returns a lobby instance.
 So we can use it as a singleton.



Property changes on: trunk
___________________________________________________________________
Name: svk:merge
   - 1f59643a-e6e5-0310-bc24-f7d4c744f460:/haver/havercurs-objc:43050
1f59643a-e6e5-0310-bc24-f7d4c744f460:/haver/local/trunk:11166
1f59643a-e6e5-0310-bc24-f7d4c744f460:/haver/local/trunk-merge-10131:11178
27e50396-46e3-0310-8b22-ae223a1f35ce:/local:212
e9404bb1-7af0-0310-a7ff-e22194cd388b:/haver/local:1072
edfcd8bd-4ce7-0310-a97e-bb1efd40edf3:/local:238
   + 1f59643a-e6e5-0310-bc24-f7d4c744f460:/haver/havercurs-objc:43050
1f59643a-e6e5-0310-bc24-f7d4c744f460:/haver/local/trunk:11166
1f59643a-e6e5-0310-bc24-f7d4c744f460:/haver/local/trunk-merge-10131:11178
27e50396-46e3-0310-8b22-ae223a1f35ce:/local:212
e9404bb1-7af0-0310-a7ff-e22194cd388b:/haver/local:1073
edfcd8bd-4ce7-0310-a97e-bb1efd40edf3:/local:238

Modified: trunk/main/server/lib/Haver/Server/Entity/Lobby.pm
===================================================================
--- trunk/main/server/lib/Haver/Server/Entity/Lobby.pm  2005-06-16 08:52:51 UTC 
(rev 768)
+++ trunk/main/server/lib/Haver/Server/Entity/Lobby.pm  2005-06-16 08:52:57 UTC 
(rev 769)
@@ -5,8 +5,11 @@
 
 our $VERSION = 0.20;
 our $Self;
-const name => '&lobby';
 
+const name   => '&lobby';
+const lobby  => new Haver::Server::Entity::Lobby;
+
+
 sub can_contain {
     my $object = shift;
     $self != $object;
@@ -32,12 +35,3 @@
     }
 }
 
-
-sub contents {
-    my ($ns) = @_;
-    my $c = super($ns);
-    if ($ns eq 'channel') {
-        push @$c, $self;
-    }
-    wantarray ? @$c : $c;
-}