--- deliantra/Deliantra-Client/DC/MapWidget.pm 2006/05/25 00:26:19 1.36 +++ deliantra/Deliantra-Client/DC/MapWidget.pm 2006/05/25 01:26:53 1.37 @@ -22,6 +22,14 @@ $self->{completer} = new CFClient::MapWidget::Command:: command => $self->{command}, can_focus => 1, + tooltip => "The Command Completer\n\n" + . "This is your central interface to send text commands to the server. " + . "To enter a verbatim command to send to the server, just type the command, " + . "followed by a space, and press return. " + . "Typing the initial letters of words (or just any letters) displays guesses " + . "for commands you might want to use.\n" + . "You can use the cursor-up and cursor-down keys to select between those guesses.\n" + . "Right-Click opens a menu where you cna select further options, sich as redefining keybindings.", ; $self @@ -126,6 +134,9 @@ $::CONN->user_send ("take"); } elsif ($uni == ord " ") { $::CONN->user_send ("apply"); + } elsif ($uni == ord ".") { + $::CONN->user_send ($self->{completer}{last_command}) + if exists $self->{completer}{last_command}; } elsif ($uni == ord "\t") { # TODO: toggle inventory } elsif ($sym == CFClient::SDLK_KP_PLUS || $uni == ord "+") { @@ -407,6 +418,7 @@ if ($ev->{sym} == 13) { if (exists $self->{select}) { + $self->{last_command} = $self->{select}; $::CONN->user_send ($self->{select}); $self->hide; }