diff --git a/src/ce_editor.lfm b/src/ce_editor.lfm index 62d2d46a..fd5ed145 100644 --- a/src/ce_editor.lfm +++ b/src/ce_editor.lfm @@ -1,25 +1,25 @@ inherited CEEditorWidget: TCEEditorWidget Left = 1324 - Height = 382 + Height = 406 Top = 92 Width = 465 Caption = 'Source editor' - ClientHeight = 382 + ClientHeight = 406 ClientWidth = 465 inherited Back: TPanel - Height = 382 + Height = 406 Width = 465 - ClientHeight = 382 + ClientHeight = 406 ClientWidth = 465 inherited Content: TPanel - Height = 382 + Height = 406 Width = 465 BevelOuter = bvRaised - ClientHeight = 382 + ClientHeight = 406 ClientWidth = 465 object PageControl: TExtendedNotebook[0] Left = 3 - Height = 351 + Height = 375 Top = 3 Width = 459 Align = alClient @@ -27,7 +27,6 @@ inherited CEEditorWidget: TCEEditorWidget Images = imgList TabOrder = 0 OnChange = PageControlChange - OnCloseTabClicked = PageControlCloseTabClicked Options = [nboShowCloseButtons, nboShowAddTabButton] TabDragMode = dmAutomatic TabDragAcceptMode = dmAutomatic @@ -35,7 +34,7 @@ inherited CEEditorWidget: TCEEditorWidget object editorStatus: TStatusBar[1] Left = 3 Height = 23 - Top = 356 + Top = 380 Width = 459 BorderSpacing.Around = 2 Panels = < diff --git a/src/ce_messages.pas b/src/ce_messages.pas index df7937ce..5666793c 100644 --- a/src/ce_messages.pas +++ b/src/ce_messages.pas @@ -511,7 +511,7 @@ begin begin if pos > length(aMessg) then exit; - if aMessg[pos] in [#0..#32, ',', ':', ';', '.'] then + if aMessg[pos] in [#0..#32, ',', ':', ';'] then begin Inc(pos); result := checkIdent;