--- googlecode.com/svn/trunk/Meteor/Message.pm	2007/04/30 18:42:00	15
+++ googlecode.com/svn/trunk/Meteor/Message.pm	2007/05/01 16:59:28	16
@@ -77,6 +77,17 @@
 	$self->{'text'}=$text;
 }
 
+sub channelName {
+	shift->{'channel'};
+}
+
+sub setChannelName {
+	my $self=shift;
+	my $channelName=shift || '';
+	
+	$self->{'channel'}=$channelName;
+}
+
 sub text {
 	shift->{'text'};
 }