ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/FileClasses/_EmptyFile.pas

Comparing oup/current/FileClasses/_EmptyFile.pas (file contents):
Revision 235 by alloc, Tue Jun 12 20:31:54 2007 UTC vs.
Revision 236 by alloc, Fri Jul 13 23:15:47 2007 UTC

#	Line 19 | Line 19 | uses
19		procedure TFile_Empty.InitDataFields;
20		begin
21		inherited;
22	<	FDataFields := TBlock.Create(Self, nil, 0, 'Base', '', nil);
22	>	FDataFields := TBlock.Create(Self, nil, 'Base', '', []);
23		end;
24
25

Diff Legend

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