--- oup/current/Helper/LevelDB.pas 2007/04/03 02:59:20 167 +++ oup/current/Helper/LevelDB.pas 2007/05/02 13:19:40 173 @@ -238,7 +238,7 @@ begin for i := 0 to High(DatHeader.OSIdent) do case Connection.DataOS of DOS_WIN: DatHeader.OSIdent[i] := HeaderOSIdentWin[i]; - DOS_MAC: DatHeader.OSIdent[i] := HeaderOSIdentMac[i]; + DOS_MAC, DOS_WINDEMO: DatHeader.OSIdent[i] := HeaderOSIdentMac[i]; DOS_MACBETA: DatHeader.OSIdent[i] := HeaderOSIdentMacBeta[i]; end; for i := 0 to High(DatHeader.GlobalIdent) do @@ -279,7 +279,11 @@ begin begin case Connection.DataOS of DOS_WIN: ExtensionsHeader[i].Ident := FileTypes[j].IdentWin; - DOS_WINDEMO: ExtensionsHeader[i].Ident := FileTypes[j].IdentMac; + DOS_WINDEMO: + if FileTypes[j].Extension = 'SNDD' then + ExtensionsHeader[i].Ident := FileTypes[j].IdentWin + else + ExtensionsHeader[i].Ident := FileTypes[j].IdentMac; DOS_MAC: ExtensionsHeader[i].Ident := FileTypes[j].IdentMac; DOS_MACBETA: ExtensionsHeader[i].Ident := FileTypes[j].IdentMac; end; @@ -491,7 +495,7 @@ const begin DeleteFile(target); end; -end; + end;