summaryrefslogtreecommitdiff
path: root/UQuickConnect.pas
diff options
context:
space:
mode:
authorTomas Bzatek <tbzatek@users.sourceforge.net>2009-09-23 14:33:21 +0200
committerTomas Bzatek <tbzatek@users.sourceforge.net>2009-09-23 14:33:21 +0200
commitb19a0e9f2d4e23734c9f21ec0cb30df6940d7221 (patch)
tree1bcb356826d7c4f78af0d586add31cfdd949c046 /UQuickConnect.pas
parent3c11c85e19dcfe73c7d6ed6e8eb4d5f3a48e89e2 (diff)
downloadtuxcmd-0.6.63.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.pas2
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)