diff options
| author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-11-17 15:25:54 +0000 |
|---|---|---|
| committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-11-17 15:25:54 +0000 |
| commit | ec75bc2b03e707c479f3605ffc1a8d9fe38c165b (patch) | |
| tree | 9876ee5882c391a769549ae8bbac13fd8a1a2e5b /src/screens | |
| parent | e5f4cb8047ce1d3f0392218c8c195aa6f4133d26 (diff) | |
| download | usdx-ec75bc2b03e707c479f3605ffc1a8d9fe38c165b.tar.gz usdx-ec75bc2b03e707c479f3605ffc1a8d9fe38c165b.tar.xz usdx-ec75bc2b03e707c479f3605ffc1a8d9fe38c165b.zip | |
header tags that are not supported are written to the end of the songheader when saving in editor
fixed header reader ending in infinite loop when there is a header line w/o Colon
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1943 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/screens')
| -rw-r--r-- | src/screens/UScreenEditSub.pas | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/screens/UScreenEditSub.pas b/src/screens/UScreenEditSub.pas index 00e62c16..04407005 100644 --- a/src/screens/UScreenEditSub.pas +++ b/src/screens/UScreenEditSub.pas @@ -1296,7 +1296,12 @@ begin if FileExt.ToUTF8 = '.xml' then Error := not CurrentSong.LoadXMLSong() else - Error := not CurrentSong.LoadSong(); + begin + // reread header with custom tags + Error := not CurrentSong.Analyse(true); + if not Error then + Error := not CurrentSong.LoadSong; + end; except Error := true; end; |