aboutsummaryrefslogtreecommitdiffstats
path: root/src/screens
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-17 15:25:54 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-17 15:25:54 +0000
commitec75bc2b03e707c479f3605ffc1a8d9fe38c165b (patch)
tree9876ee5882c391a769549ae8bbac13fd8a1a2e5b /src/screens
parente5f4cb8047ce1d3f0392218c8c195aa6f4133d26 (diff)
downloadusdx-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.pas7
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;