--- deliantra/Deliantra-Client/DC/Item.pm	2006/12/09 02:21:25	1.1
+++ deliantra/Deliantra-Client/DC/Item.pm	2006/12/09 21:50:00	1.3
@@ -1,6 +1,8 @@
 package CFPlus::Item;
 
 use strict;
+use utf8;
+
 use Crossfire::Protocol::Constants;
 
 my $last_enter_count = 1;
@@ -70,7 +72,7 @@
    my ($self) = @_;
 
    # necessary to avoid cyclic references
-   Scalar::Util::weaken $self;
+   CFPlus::weaken $self;
 
    my $button_cb = sub {
       my (undef, $ev, $x, $y) = @_;