Skip to content

Commit 152c8c6

Browse files
committed
* fix compilation
1 parent f52d1a2 commit 152c8c6

1 file changed

Lines changed: 1 addition & 1 deletion

File tree

cad_source/zcad/gui/forms/uzcflinetypesload.pas

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -61,7 +61,7 @@ procedure TLineTypesLoadForm.LoadFromFile(FileName:string);
6161

6262
//если был BOM становимся за него, если нет выставляем системную кодировку
6363
if AEncoding=nil then begin
64-
AEncoding:={$IfDef WINDOWS}TEncoding.ANSI{$ElseIf}TEncoding.UTF8{$endif};
64+
AEncoding:={$IfDef WINDOWS}TEncoding.ANSI{$Else}TEncoding.UTF8{$endif};
6565
FileStream.Seek(0,soBeginning);
6666
end else
6767
FileStream.Seek(Length(AEncoding.GetPreamble),soBeginning);

0 commit comments

Comments
 (0)