--- deliantra/Deliantra-Client/DC/Protocol.pm	2006/06/01 18:56:05	1.15
+++ deliantra/Deliantra-Client/DC/Protocol.pm	2006/06/05 01:59:59	1.18
@@ -431,7 +431,7 @@
    $self->{statusbox}->add ($text,
       group        => $text,
       fg           => $color[$color],
-      timeout      => 10,
+      timeout      => $color >= 2 ? 60 : 10,
       tooltip_font => $::FONT_FIXED,
    );
 }
@@ -447,7 +447,7 @@
 
    # TODO
    # create a widget dynamically, using spell face (CF::Protocol downloads them)
-   $::SPELL_LIST->add_spell ($spell);
+   $::SETUP_SPELLS->add_spell ($spell);
 
    $self->{map_widget}->add_command ("invoke $spell->{name}", CFClient::UI::Label::escape $spell->{message});
    $self->{map_widget}->add_command ("cast $spell->{name}", CFClient::UI::Label::escape $spell->{message});
@@ -455,7 +455,7 @@
 
 sub spell_delete {
    my ($self, $spell) = @_;
-   $::SPELL_LIST->remove_spell ($spell);
+   $::SETUP_SPELLS->remove_spell ($spell);
 }
 
 sub addme_success {