small bug fix

editor/studio/AMXX_Studio.dof

@@ -115,7 +115,7 @@ AutoIncBuild=1
 MajorVer=1
 MinorVer=3
 Release=0
-Build=32
+Build=35
 Debug=0
 PreRelease=0
 Special=0
@@ -126,7 +126,7 @@ CodePage=1252
 [Version Info Keys]
 CompanyName=AMX Mod X Dev Team
 FileDescription=
-FileVersion=1.3.0.32
+FileVersion=1.3.0.35
 InternalName=
 LegalCopyright=
 LegalTrademarks=

editor/studio/UnitCodeUtils.pas

@@ -473,7 +473,7 @@ begin
   if Pos('(', eStr) = 0 then
     Result := ''
   else
-    Result := Trim(Copy(eStr, 1, Pos('(', eStr)));
+    Result := Trim(Copy(eStr, 1, Pos('(', eStr) -1));
 end;
 
 end.

editor/studio/UnitfrmMain.pas

@@ -517,6 +517,7 @@ begin
     frmSettings.lstFunctions.Items.Add(TACFunction(eACList.Items[i]).Name);
 
   if frmSettings.ShowModal = mrOk then begin
+    Screen.Cursor := crHourGlass;
     { Shortcuts }
     for i := 0 to frmSettings.lvShortcuts.Items.Count - 1 do
       TSciKeyCommand(frmSettings.lvShortcuts.Items[i].Data).ShortCut := (TextToShortCut(frmSettings.lvShortcuts.Items[i].SubItems[0]));
@@ -603,6 +604,7 @@ begin
     eConfig.WriteString('Misc', 'LangDir', frmSettings.txtLangDir.Text);
     eConfig.WriteBool('Misc', 'ShowStatusbar', frmSettings.chkShowStatusbar.Checked);
     eACList.SaveToFile(ExtractFilePath(ParamStr(0)) + 'config\ACList.cfg');
+    Screen.Cursor := crDefault;
   end
   else begin
     { Restore Code-Snippets }
@@ -2138,16 +2140,15 @@ var i: integer;
     eFunction: String;
 begin
   CancelDisplay := not Plugin_CallTipShow(ListToDisplay.GetText);
-  if (frmSettings.chkAutoHideCT.Checked) and (jviCode.Root.Items[0].DisplayName = 'Function Call') then begin
-    eFunction := GetCurrFunc;
-    if eFunction <> '' then begin
-      eFunction := LowerCase(eFunction);
-      for i := 0 to eACList.Count -1 do begin
-        if eFunction = LowerCase(Trim(TACFunction(eACList.Items[i]).Name)) then begin
-          if TACFunction(eACList.Items[i]).Items.Count > GetFunctionPos then begin
-            CancelDisplay := True;
-            break;
-          end;
+  eFunction := GetCurrFunc;
+  if (frmSettings.chkAutoHideCT.Checked) and (eFunction <> '') then begin
+    eFunction := LowerCase(eFunction);
+
+    for i := 0 to eACList.Count -1 do begin
+      if eFunction = LowerCase(Trim(TACFunction(eACList.Items[i]).Name)) then begin
+        if TACFunction(eACList.Items[i]).Items.Count > GetFunctionPos then begin
+          CancelDisplay := True;
+          break;
         end;
       end;
     end;

editor/studio/UnitfrmSettings.dfm

@@ -64,7 +64,7 @@ object frmSettings: TfrmSettings
     Top = 0
     Width = 351
     Height = 260
-    ActivePage = jspCTSettings
+    ActivePage = jspAutocompleteCheck
     PropagateEnable = False
     Align = alClient
     OnChange = jplSettingsChange
@@ -110,7 +110,7 @@ object frmSettings: TfrmSettings
         Height = 21
         Style = csDropDownList
         Color = clWindow
-        ItemHeight = 13
+        ItemHeight = 0
         TabOrder = 0
         ItemIndex = -1
         OnChange = cboLanguageChange

editor/studio/UnitfrmSettings.pas

@@ -1088,11 +1088,13 @@ end;
 
 procedure TfrmSettings.lvParamsDblClick(Sender: TObject);
 begin
-  frmParamEdit.Caption := 'Edit parameter information';
   if (lstFunctions.ItemIndex <> -1) and (Assigned(lvParams.Selected)) then begin
-    frmParamEdit.txtInformation.Text := lvParams.Selected.SubItems[0];
+    frmParamEdit.Caption := 'Edit parameter information';
+    frmParamEdit.txtFunction.Text := lstFunctions.Items[lstFunctions.ItemIndex];
+    frmParamEdit.txtInformation.Text := StringReplace(lvParams.Selected.SubItems[0], '; ', #13#10, [rfReplaceAll]);
     if frmParamEdit.ShowModal = mrOk then begin
       lvParams.Selected.SubItems[0] := StringReplace(frmParamEdit.txtInformation.Lines.Text, #13#10, '; ', [rfReplaceAll]);
+      lstFunctions.Items[lstFunctions.ItemIndex] := frmParamEdit.txtFunction.Text;
 
       with TACFunction(eACList.Items[lstFunctions.ItemIndex]) do begin
         Name := lstFunctions.Items[lstFunctions.ItemIndex];