--- googlecode.com/svn/trunk/Meteor/Channel.pm	2007/04/30 18:16:17	13
+++ googlecode.com/svn/trunk/Meteor/Channel.pm	2007/05/20 19:40:53	25
@@ -99,6 +99,11 @@
 	map { $_->clearBuffer() } (values %Channels);
 }
 
+sub numChannels {
+	
+	return scalar(keys %Channels);
+}
+
 ###############################################################################
 # Factory methods
 ###############################################################################
@@ -160,14 +165,16 @@
 	
 	$startIndex=0 if($startIndex<0);
 	
+	my $numMsgToSend=0;
 	while($startIndex<$msgCount)
 	{
 		my $message=$self->{'messages'}->[$startIndex++];
 		
 		$txt.=$message->message();
+		$numMsgToSend++;
 	}
 	
-	$subscriber->sendMessage($txt);
+	$subscriber->sendMessage($txt,$numMsgToSend);
 }
 
 sub removeSubscriber {
@@ -203,7 +210,8 @@
 	my $messageText=shift;
 	
 	my $message=Meteor::Message->newWithID($MessageID++);
-	$message->setText($messageText);	
+	$message->setText($messageText);
+	$message->setChannelName($self->{'name'});
 	push(@{$self->{'messages'}},$message);
 	
 	$self->trimMessageStoreBySize();