Index: installer/SlimServer.iss =================================================================== --- installer/SlimServer.iss (revision 11889) +++ installer/SlimServer.iss (working copy) @@ -294,23 +294,26 @@ end; - if CurStep = ssDone then begin + if CurStep = ssPostInstall then begin if not FileExists(FileName) then begin - PrefString := 'audiodir = ' + MyMusicFolder + #13#10 + 'playlistdir = ' + MyPlaylistFolder + #13#10; + PrefString := '--- ' + #13#10 + 'audiodir: ' + MyMusicFolder + #13#10 + 'playlistdir: ' + MyPlaylistFolder + #13#10; SaveStringToFile(FileName, PrefString, False); end; + end; + + if CurStep = ssDone then begin - NewServerDir := AddBackslash(ExpandConstant('{app}')) + AddBackslash('server'); - if (AutoStart = '1') then - begin - Exec(NewServerDir + 'slim.exe', '-install auto', NewServerDir, SW_SHOWMINIMIZED, ewWaitUntilTerminated, ErrorCode); - Exec('net', 'start slimsvc', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode); - end - else - begin - Exec(NewServerDir + 'slim.exe', '-install', NewServerDir, SW_SHOWMINIMIZED, ewWaitUntilTerminated, ErrorCode); - end; + NewServerDir := AddBackslash(ExpandConstant('{app}')) + AddBackslash('server'); + if (AutoStart = '1') then + begin + Exec(NewServerDir + 'slim.exe', '-install auto', NewServerDir, SW_SHOWMINIMIZED, ewWaitUntilTerminated, ErrorCode); + Exec('net', 'start slimsvc', '', SW_HIDE, ewWaitUntilTerminated, ErrorCode); + end + else + begin + Exec(NewServerDir + 'slim.exe', '-install', NewServerDir, SW_SHOWMINIMIZED, ewWaitUntilTerminated, ErrorCode); + end; end; end;