aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UFiles.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Classes/UFiles.pas')
-rw-r--r--Game/Code/Classes/UFiles.pas9
1 files changed, 7 insertions, 2 deletions
diff --git a/Game/Code/Classes/UFiles.pas b/Game/Code/Classes/UFiles.pas
index ebeb1314..93e745e5 100644
--- a/Game/Code/Classes/UFiles.pas
+++ b/Game/Code/Classes/UFiles.pas
@@ -55,6 +55,7 @@ var
PlayListPath: string;
RecordingsPath: string;
SessionLogPath: string;
+ FontPath: string;
SongFile: TextFile; // all procedures in this unit operates on this file
FileLineNo: integer; //Line which is readed at Last, for error reporting
@@ -91,6 +92,7 @@ begin
PlaylistPath := GamePath + 'Playlists\';
RecordingsPath := GamePath + 'Recordings\';
SessionLogPath := GamePath + 'SessionLog\';
+ FontPath := GamePath + 'Fonts\';
Writeable := true;
@@ -125,6 +127,9 @@ begin
If Writeable And (not DirectoryExists(SessionLogPath)) then
Writeable := ForceDirectories(SessionLogPath);
+ If Writeable And (not DirectoryExists(FontPath)) then
+ Writeable := ForceDirectories(FontPath);
+
if not Writeable then
Log.LogError('Error: Dir is Readonly');
@@ -1334,7 +1339,7 @@ begin
begin
for J := I+1 to num_lines - 1 do
begin
- if sentences[I]=sentences[J] then
+ if (sentences[I]<>'') and (sentences[I]=sentences[J]) then
begin
temp_series.start := I;
temp_series.end_ := I;
@@ -1346,7 +1351,7 @@ begin
for K := 1 to max do
begin
- if sentences[I+K]=sentences[J+K] then
+ if (sentences[I+K]<>'') and (sentences[I+K]=sentences[J+K]) then
temp_series.end_ := I+K
else
break;