moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-22 01:02:17 -05:00
Code Issues Releases Wiki Activity

Extension: Crov.sex, Updated for OpenScript Update.

Browse Source
This commit is contained in:
John P (Dgby714) 2010-12-25 04:19:39 -05:00
parent cb92a880d6
commit cc56f02cee
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Extensions/CRov.sex
View File

@ -244,7 +244,7 @@ var
s: TStringList; s: TStringList;
begin begin
a := TMenuItem(Sender).Hint; a := TMenuItem(Sender).Hint;
Delete(a, Length(a) - Length('.'+Extension) + 1, Length('.'+Extension)); Delete(a, Length(a) - Length('.' + Extension) + 1, Length('.' + Extension));
SplitRecoverInfo(a, a, b, c); SplitRecoverInfo(a, a, b, c);
if (not ForceSave) then if (not ForceSave) then
@ -252,7 +252,7 @@ begin
s := TStringList.Create; s := TStringList.Create;
try try
s.LoadFromFile(TMenuItem(Sender).Hint); s.LoadFromFile(TMenuItem(Sender).Hint);
OpenScript(a, s.Text); OpenScript(a, s.Text, False);
finally finally
s.Free; s.Free;
end; end;