ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Tools/TxmpReplace.pas
(Generate patch)

Comparing oup/current/Tools/TxmpReplace.pas (file contents):
Revision 254 by alloc, Thu Jun 28 09:24:08 2007 UTC vs.
Revision 255 by alloc, Tue Dec 18 20:48:24 2007 UTC

# Line 176 | Line 176 | begin
176      newsize := mem.Size;
177      mem.Seek(0, soFromBeginning);
178  
179 <    if (newsize > old_size) and (ConManager.Connection[ConnectionID].Backend = DB_ONI) then
179 >    if (newsize > old_size) and (ConManager.Connection[ConnectionID].Backend in [DB_ONI, DB_ONISPLIT]) then
180        new_rawaddr := ConManager.Connection[ConnectionID].AppendRawFile(
181          not (ConManager.Connection[ConnectionID].DataOS = DOS_WIN), mem)
182      else
# Line 189 | Line 189 | begin
189        oldfading := oldfading or $01
190      else
191        oldfading := oldfading and (not Byte($01));
192 <    ConManager.Connection[ConnectionID].UpdateDatFilePart(fileid, $88, 1, @datbyte);
192 >    ConManager.Connection[ConnectionID].UpdateDatFilePart(fileid, $88, 1, @oldfading);
193      datbyte := $10;
194   //    if check_transparency.Checked then
195   //      datbyte := datbyte or $04;

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)