diff --git a/src/Pyramid-Bloc/PyramidTreePresenter.class.st b/src/Pyramid-Bloc/PyramidTreePresenter.class.st
index 696dce0b..9d3f7fcf 100644
--- a/src/Pyramid-Bloc/PyramidTreePresenter.class.st
+++ b/src/Pyramid-Bloc/PyramidTreePresenter.class.st
@@ -181,7 +181,7 @@ PyramidTreePresenter >> updateRoots [
 	| roots parent shouldOrder |
 	self shouldUpdateSelection: false.
 
-	roots := self projectModel roots asArray.
+	roots := self projectModel firstLevelElements asArray.
 	parent := nil.
 	
 	"If roots all have the same parent then it should be ordered by the parent children order."