--- deliantra/Deliantra-Client/DC/MessageDistributor.pm 2008/03/20 22:28:33 1.3
+++ deliantra/Deliantra-Client/DC/MessageDistributor.pm 2008/10/28 12:20:36 1.6
@@ -14,13 +14,12 @@
can_close => 0,
can_undock => 0,
info => {
+ id => "",
title => "Log",
- tooltip =>
- "Server Log. This text viewer contains all recent message sent by the server.",
- entry_tooltip =>
- "Command Entry. If you enter something and press return/enter here, "
- ."the line you entered will be sent to the server as a command.",
- reply => ''
+ tooltip => "Server Log. This text viewer contains all recent message sent by the server.",
+ entry_tooltip => "Command Entry. If you enter something and press return/enter here, "
+ . "the line you entered will be sent to the server as a command.",
+ reply => ''
}
)
);
@@ -43,7 +42,10 @@
# set max paragraphs
sub set_max_par {
- # nop
+ my ($self, $par) = @_;
+ for ($self->{log}, values %{$self->{chatview}}) {
+ $_->set_max_par ($par);
+ }
}
# set fontsize for all chatviews
@@ -93,6 +95,7 @@
sub update_chat {
my ($self, $id) = @_;
+
$self->{chatview}->{$id}->update_info ($self->{info}->{$id});
}