aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/UFiles.pas
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-17 15:37:08 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-11-17 15:37:08 +0000
commit61eaa45ee2bf7fc1d91faae3d10f3e093e3bc42c (patch)
treeac53abd709b1bfd4d1d236377f7e12637dc68dc6 /src/base/UFiles.pas
parentec75bc2b03e707c479f3605ffc1a8d9fe38c165b (diff)
downloadusdx-61eaa45ee2bf7fc1d91faae3d10f3e093e3bc42c.tar.gz
usdx-61eaa45ee2bf7fc1d91faae3d10f3e093e3bc42c.tar.xz
usdx-61eaa45ee2bf7fc1d91faae3d10f3e093e3bc42c.zip
load and save year tag
sorting by year still missing git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1944 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/UFiles.pas')
-rw-r--r--src/base/UFiles.pas1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/base/UFiles.pas b/src/base/UFiles.pas
index 2820a08c..5a258e3e 100644
--- a/src/base/UFiles.pas
+++ b/src/base/UFiles.pas
@@ -139,6 +139,7 @@ begin
if Song.Edition <> 'Unknown' then SongFile.WriteLine('#EDITION:' + EncodeToken(Song.Edition));
if Song.Genre <> 'Unknown' then SongFile.WriteLine('#GENRE:' + EncodeToken(Song.Genre));
if Song.Language <> 'Unknown' then SongFile.WriteLine('#LANGUAGE:' + EncodeToken(Song.Language));
+ if Song.Year <> 0 then SongFile.WriteLine('#YEAR:' + IntToStr(Song.Year));
SongFile.WriteLine('#MP3:' + EncodeToken(Song.Mp3.ToUTF8));
if Song.Cover.IsSet then SongFile.WriteLine('#COVER:' + EncodeToken(Song.Cover.ToUTF8));