… | |
… | |
73 | for values %{delete $ws->{w} || {}}; |
73 | for values %{delete $ws->{w} || {}}; |
74 | } |
74 | } |
75 | |
75 | |
76 | delete $self->{items}; |
76 | delete $self->{items}; |
77 | $::INV->clear; |
77 | $::INV->clear; |
|
|
78 | $::INVR->clear; |
78 | $::INVR_HB->clear; |
79 | $::INVR_HB->clear; |
79 | $::FLOORBOX->clear; |
80 | $::FLOORBOX->clear; |
80 | }); |
81 | }); |
81 | |
82 | |
82 | $self->{map_widget}->add_command (@$_) |
83 | $self->{map_widget}->add_command (@$_) |
… | |
… | |
1542 | } |
1543 | } |
1543 | |
1544 | |
1544 | sub send { |
1545 | sub send { |
1545 | my ($self, $msg) = @_; |
1546 | my ($self, $msg) = @_; |
1546 | |
1547 | |
1547 | $self->{textview}->add_paragraph ({ markup => "\n" . DC::asxml $msg }); |
1548 | $self->{textview}->add_paragraph ({ |
|
|
1549 | markup => |
|
|
1550 | "\n<span foreground='#ffff00'><b>" |
|
|
1551 | . (DC::asxml $msg) |
|
|
1552 | . "</b></span>" |
|
|
1553 | }); |
1548 | $self->{textview}->scroll_to_bottom; |
1554 | $self->{textview}->scroll_to_bottom; |
1549 | |
1555 | |
1550 | $self->{conn}->send_ext_msg (npc_dialog_tell => $self->{id}, $msg); |
1556 | $self->{conn}->send_ext_msg (npc_dialog_tell => $self->{id}, $msg); |
1551 | } |
1557 | } |
1552 | |
1558 | |