diff options
| author | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2009-09-23 14:33:21 +0200 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2009-09-23 14:33:21 +0200 |
| commit | b19a0e9f2d4e23734c9f21ec0cb30df6940d7221 (patch) | |
| tree | 1bcb356826d7c4f78af0d586add31cfdd949c046 /UQuickConnect.pas | |
| parent | 3c11c85e19dcfe73c7d6ed6e8eb4d5f3a48e89e2 (diff) | |
| download | tuxcmd-b19a0e9f2d4e23734c9f21ec0cb30df6940d7221.tar.xz | |
Fix pressing Enter key in Quick Connect dialog leading to invalid VFS connectionv0.6.63
Diffstat (limited to 'UQuickConnect.pas')
| -rw-r--r-- | UQuickConnect.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/UQuickConnect.pas b/UQuickConnect.pas index d92e335..aaaa0bf 100644 --- a/UQuickConnect.pas +++ b/UQuickConnect.pas @@ -183,7 +183,7 @@ procedure TFQuickConnect.FormKeyDown(Sender: TObject; Key: Word; Shift: TShiftSt begin case Key of GDK_RETURN, GDK_KP_ENTER: if StopButton.Visible then StopButtonClick(Sender) - else DoConnect; + else if ConnectButton.Enabled then DoConnect; GDK_ESCAPE: begin Accept := False; if StopButton.Visible then StopButtonClick(Sender) |