diff options
| author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-11-18 12:45:34 +0000 |
|---|---|---|
| committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-11-18 12:45:34 +0000 |
| commit | 69f8925636e89f9803490f3407380879eb0549e6 (patch) | |
| tree | e53737d4ca219a139a435cbfe9035f2e54c6a11e /src/base/UPlaylist.pas | |
| parent | 1c86cfca45351b172e42d508cb55788c644ed392 (diff) | |
| download | usdx-69f8925636e89f9803490f3407380879eb0549e6.tar.gz usdx-69f8925636e89f9803490f3407380879eb0549e6.tar.xz usdx-69f8925636e89f9803490f3407380879eb0549e6.zip | |
fixed playlist creation bug: absolute path instead of just the filename was written to Playlist.Filename
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1948 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/UPlaylist.pas')
| -rw-r--r-- | src/base/UPlaylist.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/base/UPlaylist.pas b/src/base/UPlaylist.pas index 03ae2ffb..188b02a6 100644 --- a/src/base/UPlaylist.pas +++ b/src/base/UPlaylist.pas @@ -350,7 +350,7 @@ begin Inc(I); PlaylistFile := PlaylistPath.Append(Name + InttoStr(I) + '.upl'); end; - Playlists[Result].Filename := PlaylistFile; + Playlists[Result].Filename := PlaylistFile.GetName; //Save new Playlist SavePlayList(Result); |