equal
deleted
inserted
replaced
373 var s: shortstring; |
373 var s: shortstring; |
374 begin |
374 begin |
375 if (not isSoundEnabled) or (MusicFN = '') or (not isMusicEnabled) then |
375 if (not isSoundEnabled) or (MusicFN = '') or (not isMusicEnabled) then |
376 exit; |
376 exit; |
377 |
377 |
378 s:= UserPathPrefix + '/Music/' + MusicFN; |
378 s:= UserPathPrefix + '/Data/Music/' + MusicFN; |
379 if not FileExists(s) then s:= PathPrefix + '/Music/' + MusicFN; |
379 if not FileExists(s) then s:= PathPrefix + '/Music/' + MusicFN; |
380 WriteToConsole(msgLoading + s + ' '); |
380 WriteToConsole(msgLoading + s + ' '); |
381 |
381 |
382 Mus:= Mix_LoadMUS(Str2PChar(s)); |
382 Mus:= Mix_LoadMUS(Str2PChar(s)); |
383 TryDo(Mus <> nil, msgFailed, false); |
383 TryDo(Mus <> nil, msgFailed, false); |