--- deliantra/Deliantra-Client/DC/UI.pm	2006/05/12 15:45:42	1.199
+++ deliantra/Deliantra-Client/DC/UI.pm	2006/05/13 00:27:09	1.200
@@ -1482,9 +1482,9 @@
 
    my $text = $self->get_text;
 
-   if ($sym == 8) {
+   if ($uni == 8) {
       substr $text, --$self->{cursor}, 1, "" if $self->{cursor};
-   } elsif ($sym == 127) {
+   } elsif ($uni == 127) {
       substr $text, $self->{cursor}, 1, "";
    } elsif ($sym == CFClient::SDLK_LEFT) {
       --$self->{cursor} if $self->{cursor};
@@ -1494,7 +1494,7 @@
       $self->{cursor} = 0;
    } elsif ($sym == CFClient::SDLK_END) {
       $self->{cursor} = length $text;
-   } elsif ($sym == 27) {
+   } elsif ($uni == 27) {
       $self->emit ('escape');
    } elsif ($uni) {
       substr $text, $self->{cursor}++, 0, chr $uni;