--- deliantra/Deliantra-Client/DC/Item.pm 2007/07/17 22:08:56 1.6 +++ deliantra/Deliantra-Client/DC/Item.pm 2007/12/26 18:09:30 1.9 @@ -2,8 +2,9 @@ use strict; use utf8; +use Encode; -use Crossfire::Protocol::Constants; +use Deliantra::Protocol::Constants; my $last_enter_count = 1; @@ -116,7 +117,7 @@ &::open_string_query ("Text to inscribe", sub { my ($entry, $txt) = @_; $::CONN->send ("mark ". pack "N", $self->{tag}); - $::CONN->send ("command use_skill inscription $txt"); + $::CONN->send_utf8 ("command use_skill inscription $txt"); }); } ], @@ -125,7 +126,7 @@ &::open_string_query ("Rename item to:", sub { my ($entry, $txt) = @_; $::CONN->send ("mark ". pack "N", $self->{tag}); - $::CONN->send ("command rename to <$txt>"); + $::CONN->send_utf8 ("command rename to <$txt>"); }, $self->{name}, "If you input no name or erase the current custom name, the custom name will be unset"); } @@ -168,6 +169,8 @@ : $self->{flags} & F_MAGIC ? [0.2, 0.2, 1, 0.5] : undef; + my $desc = CFPlus::Item::desc_string $self; + $self->{face_widget} ||= new CFPlus::UI::Face can_events => 1, can_hover => 1, @@ -179,12 +182,13 @@ $self->{face_widget}{face} = $self->{face}; $self->{face_widget}{anim} = $self->{anim}; $self->{face_widget}{animspeed} = $self->{animspeed}; - $self->{face_widget}->set_tooltip ( - "Face/Animation.\n" - . "Item uses face #$self->{face}. " - . ($self->{animspeed} ? "Item uses animation #$self->{anim} at " . (1 / $self->{animspeed}) . "fps. " : "Item is not animated. ") - . "\n\n$tooltip_std" - ); +# $self->{face_widget}->set_tooltip ( +# "Face/Animation.\n" +# . "Item uses face #$self->{face}. " +# . ($self->{animspeed} ? "Item uses animation #$self->{anim} at " . (1 / $self->{animspeed}) . "fps. " : "Item is not animated. ") +# . "\n\n$tooltip_std" +# ); + $self->{face_widget}->set_tooltip ("$desc\n\n$tooltip_std"); $self->{desc_widget} ||= new CFPlus::UI::Label can_events => 1, @@ -207,7 +211,6 @@ }, ; - my $desc = CFPlus::Item::desc_string $self; $self->{desc_widget}{bg} = $bg; $self->{desc_widget}->set_text ($desc);