--- deliantra/Deliantra-Client/DC/MapWidget.pm	2006/05/30 07:13:08	1.44
+++ deliantra/Deliantra-Client/DC/MapWidget.pm	2006/05/30 14:35:09	1.45
@@ -158,9 +158,17 @@
          $::CONN->user_send ("$DIR{$sym}[1]");
       }
    } elsif ($sym == CFClient::SDLK_INSERT && $mod & CFClient::KMOD_CTRL) {
-      CFClient::Recorder::start (1);
+      $::BIND_EDITOR->set_binding (undef, undef, [],
+         sub {
+            my ($mod, $sym, $cmds) = @_;
+            $::CFG->{bindings}->{$mod}->{$sym} = $cmds;
+         });
+      $::BIND_EDITOR->start;
+      $::BIND_EDITOR->show;
    } elsif ($sym == CFClient::SDLK_INSERT && not ($mod & CFClient::KMOD_CTRL)) {
-      CFClient::Recorder::stop (1);
+      $::BIND_EDITOR->stop;
+      $::BIND_EDITOR->ask_for_bind (1);
+      $::BIND_EDITOR->hide;
    } elsif (my $bind_cmd = $::CFG->{bindings}->{$mod}->{$sym}) {
       $::CONN->user_send ($_) for @$bind_cmd;
    } elsif ((ord 'a') <= $uni && $uni <= (ord 'z')) {