diff --git a/Forms/EditBone.Form.Main.pas b/Forms/EditBone.Form.Main.pas index 46e9123..6d83284 100644 --- a/Forms/EditBone.Form.Main.pas +++ b/Forms/EditBone.Form.Main.pas @@ -1358,12 +1358,12 @@ procedure TMainForm.ActionSearchToggleBookmarkExecute(Sender: TObject); LEditor := FDocument.GetActiveEditor; if Assigned(LEditor) then LEditor.ToggleBookMark - { else + else begin LEditor := FDocument.GetActiveSplitEditor; if Assigned(LEditor) then LEditor.ToggleBookMark - end; } + end; end; procedure TMainForm.ActionSelectEncodingExecute(Sender: TObject); diff --git a/Units/EditBone.Document.pas b/Units/EditBone.Document.pas index cdec631..d0e3835 100644 --- a/Units/EditBone.Document.pas +++ b/Units/EditBone.Document.pas @@ -2719,6 +2719,7 @@ procedure TEBDocument.ToggleSplit; LSplitEditor.Highlighter.Colors.LoadFromFile(LEditor.Highlighter.Colors.FileName); LSplitEditor.ChainEditor(LEditor); LSplitEditor.SetFocus; + LSplitEditor.Minimap.Visible := LEditor.Minimap.Visible; { horizontal splitter } LSplitterHorizontal := TBCSplitter.Create(PageControl.ActivePage); LSplitterHorizontal.Align := alBottom; @@ -2741,12 +2742,16 @@ procedure TEBDocument.ToggleSplit; end; procedure TEBDocument.ToggleMiniMap; -var - LEditor: TBCEditor; + + procedure ToggleMinimap(AEditor: TBCEditor); + begin + if Assigned(AEditor) then + AEditor.Minimap.Visible := not AEditor.Minimap.Visible; + end; + begin - LEditor := GetActiveEditor; - if Assigned(LEditor) then - LEditor.Minimap.Visible := not LEditor.Minimap.Visible; + ToggleMinimap(GetActiveEditor); + ToggleMinimap(GetActiveSplitEditor); end; {function TEBDocument.IsCompareFilesActivePage: Boolean;