mirror of
https://github.com/moparisthebest/Simba
synced 2024-12-22 23:38:50 -05:00
Reverted stupid mistakes.
This commit is contained in:
parent
22d9fffd05
commit
f8101a4227
@ -1846,18 +1846,6 @@ begin
|
||||
begin
|
||||
MethodInfo := PMethodInfo(node.Data)^;
|
||||
StatusBar.Panels[Panel_ScriptPath].Text := MethodInfo.MethodStr;
|
||||
if frmFunctionList.DraggingNode = node then
|
||||
if (MethodInfo.BeginPos > 0) then
|
||||
begin;
|
||||
if MethodInfo.Filename <> nil then
|
||||
if MethodInfo.Filename <> '' then
|
||||
begin;
|
||||
// Writeln(MethodInfo.filename);
|
||||
LoadScriptFile(MethodInfo.Filename,true,true);
|
||||
end;
|
||||
CurrScript.SynEdit.SelStart := MethodInfo.BeginPos + 1;
|
||||
CurrScript.SynEdit.SelEnd := MethodInfo.EndPos + 1;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
@ -1994,9 +1982,12 @@ begin
|
||||
a.OnCompile := OnCompile;
|
||||
a.OnCompImport := OnCompImport;
|
||||
a.OnExecImport := OnExecImport;
|
||||
a.Defines.Assign(Defines);
|
||||
end;
|
||||
a.GetValueDefs(b);
|
||||
|
||||
CoreDefines.AddStrings(a.Defines);
|
||||
|
||||
SetLength(CoreBuffer, 1);
|
||||
CoreBuffer[0] := TCodeInsight.Create;
|
||||
with CoreBuffer[0] do
|
||||
@ -2004,7 +1995,7 @@ begin
|
||||
OnMessage := @form1.OnCCMessage;
|
||||
b.SaveToStream(ms);
|
||||
Run(ms, nil, -1, True);
|
||||
FileName := '!PSCORE!';
|
||||
FileName := '"PSCORE"';
|
||||
end;
|
||||
finally
|
||||
b.Free;
|
||||
|
Loading…
Reference in New Issue
Block a user