diff options
| -rw-r--r-- | src/base/USong.pas | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/base/USong.pas b/src/base/USong.pas index 151ad73d..fccf2757 100644 --- a/src/base/USong.pas +++ b/src/base/USong.pas @@ -380,6 +380,14 @@ begin Str := ParseLyricStringParam(Line, LinePos); if (Length(Str) <> 1) then begin + { to-do : decide what to do here + usdx < 1.1 does not nead a whitespace after a char param + so we may just write a warning to error.log and use the + first non whitespace character instead of raising an + exception that causes the song not to load. So the more + error resistant code is: + LinePos := OldLinePos + 1; + // raise EUSDXParseException.Create('Character expected'); } LinePos := OldLinePos; raise EUSDXParseException.Create('Character expected'); end; |