--- deliantra/Deliantra-Client/DC/MapWidget.pm	2006/05/27 19:49:07	1.39
+++ deliantra/Deliantra-Client/DC/MapWidget.pm	2006/05/29 19:30:28	1.43
@@ -41,9 +41,7 @@
    (my $data = $command) =~ s/\\//g;
 
    $tooltip =~ s/^\s+//;
-
    $tooltip = "<big>$data</big>\n\n$tooltip";
-
    $tooltip =~ s/\s+$//;
 
    $self->{completer}{command}{$command} = [$data, $tooltip, $widget, $cb, ++$self->{command_id}];
@@ -138,7 +136,7 @@
       $::CONN->user_send ($self->{completer}{last_command})
          if exists $self->{completer}{last_command};
    } elsif ($uni == ord "\t") {
-      # TODO: toggle inventory
+      $::INV_WINDOW->toggle_visibility;
    } elsif ($sym == CFClient::SDLK_KP_PLUS  || $uni == ord "+") {
       $::CONN->user_send ("rotateshoottype +");
    } elsif ($sym == CFClient::SDLK_KP_MINUS || $uni == ord "-") {
@@ -159,7 +157,13 @@
       } else {
          $::CONN->user_send ("$DIR{$sym}[1]");
       }
-   } elsif ($ev->{unicode}) {
+   } elsif ($sym == CFClient::SDLK_INSERT && $mod & CFClient::KMOD_CTRL) {
+      CFClient::Recorder::start (1);
+   } elsif ($sym == CFClient::SDLK_INSERT && not ($mod & CFClient::KMOD_CTRL)) {
+      CFClient::Recorder::stop (1);
+   } elsif (my $bind_cmd = $::CFG->{bindings}->{$mod}->{$sym}) {
+      $::CONN->user_send ($_) for @$bind_cmd;
+   } elsif ((ord 'a') <= $uni && $uni <= (ord 'z')) {
       $self->{completer}->key_down ($ev);
       $self->{completer}->show;
    }
@@ -408,10 +412,10 @@
    ];
 
    $self->{entry} = new CFClient::UI::Entry
-      connect_changed => sub {
+      on_changed => sub {
          $self->update_labels;
       },
-      connect_key_down => sub {
+      on_key_down => sub {
          my ($entry, $ev) = @_;
 
          my $self = $entry->{parent}{parent};