Fix error related with "New: Returning to a node now retrieves the ex…

…act position in the editor, including status bar scrolling" (Commit dd194bc)
dpradov · Mar 17, 2024 · f633ef1 · f633ef1
1 parent f35695e
commit f633ef1
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/structure/kn_TreeNoteMng.pas b/structure/kn_TreeNoteMng.pas
@@ -415,7 +415,8 @@ procedure TreeNodeSelected( Node : TTreeNTNode; OnDeletingNode: boolean= false )
       myTreeNote := TTreeNote( ActiveNote );
       KeepModified:= false;
 
-      myTreeNote.SelectedNode.ScrollPosInEditor:= ActiveNote.Editor.GetScrollPosInEditor;
+      if assigned(myTreeNote.SelectedNode) then
+         myTreeNote.SelectedNode.ScrollPosInEditor:= ActiveNote.Editor.GetScrollPosInEditor;
 
       if ( not _Executing_History_Jump ) and (not _Executing_JumpToKNTLocation_ToOtherNote) then begin
           AddHistoryLocation( myTreeNote, false);        // Add to history the location of current node, before the new node comes to be the selected node