moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-21 08:45:06 -05:00
Code Issues Releases Wiki Activity

Fix spelling mistakes.

Browse Source
This commit is contained in:
Merlijn Wajer 2011-09-22 01:29:52 +02:00
parent b1f02535ff
commit ab08afd9c1
4 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Projects/Simba/psextension.pas
View File

@ -399,7 +399,7 @@ begin
end; end;
if InitScript then if InitScript then
mDebugLn('Init procedure succesfully called') mDebugLn('Init procedure successfully called')
else else
mDebugLn('Init procedure didn''t execute right, or couldn''t be found'); mDebugLn('Init procedure didn''t execute right, or couldn''t be found');
Enabled:= FWorking; Enabled:= FWorking;

2
Projects/Simba/simbaunit.pas
View File

@ -3172,7 +3172,7 @@ begin
Idler; Idler;
if UnTarrer.Result then if UnTarrer.Result then
begin; begin;
FormWriteln('Succesfully installed the new fonts!'); FormWriteln('Successfully installed the new fonts!');
SetSetting('Settings/Fonts/Version',IntToStr(LatestVersion),true); SetSetting('Settings/Fonts/Version',IntToStr(LatestVersion),true);
if Assigned(self.OCR_Fonts) then if Assigned(self.OCR_Fonts) then
self.OCR_Fonts.Free; self.OCR_Fonts.Free;

3
Projects/Simba/updateform.pas
View File

@ -241,7 +241,8 @@ begin
FCancelling := False; FCancelling := False;
FCancelled := True; FCancelled := True;
DownloadSpeed.Visible := false; DownloadSpeed.Visible := false;
Self.UpdateLog.Lines.Add('Download stopped at '+inttostr(DownloadProgress.Position)+'%... Simba did not succesfully update.'); Self.UpdateLog.Lines.Add('Download stopped at '+inttostr(DownloadProgress.Position)+
'%... Simba did not successfully update.');
// more detailed info // more detailed info
mDebugLn('EXCEPTION IN UPDATEFORM: We either hit Cancel, or something went wrong with files'); mDebugLn('EXCEPTION IN UPDATEFORM: We either hit Cancel, or something went wrong with files');
if FileExists(Updater.BasePath + Updater.ReplacementFile + '_') then if FileExists(Updater.BasePath + Updater.ReplacementFile + '_') then

4
Units/MMLAddon/mmlpsthread.pas
View File

@ -964,7 +964,7 @@ begin
if PSScript.Compile then if PSScript.Compile then
begin begin
OutputMessages; OutputMessages;
psWriteln('Compiled succesfully in ' + IntToStr(GetTickCount - Starttime) + ' ms.'); psWriteln('Compiled successfully in ' + IntToStr(GetTickCount - Starttime) + ' ms.');
if CompileOnly then if CompileOnly then
exit; exit;
// if not (ScriptState = SCompiling) then // if not (ScriptState = SCompiling) then
@ -1208,7 +1208,7 @@ begin
RUTIS.Compile; RUTIS.Compile;
if not RUTIS.CompilerError then if not RUTIS.CompilerError then
begin begin
psWriteln('Compiled succesfully in ' + IntToStr(GetTickCount - Starttime) + ' ms.'); psWriteln('Compiled successfully in ' + IntToStr(GetTickCount - Starttime) + ' ms.');
if CompileOnly then if CompileOnly then
exit; exit;
RUTIS.Run; RUTIS.Run;