diff --git a/src/Hiedra/HiSimpleRenderer.class.st b/src/Hiedra/HiSimpleRenderer.class.st index 8c5acce..86db308 100644 --- a/src/Hiedra/HiSimpleRenderer.class.st +++ b/src/Hiedra/HiSimpleRenderer.class.st @@ -370,8 +370,7 @@ HiSimpleRenderer >> renderNodes: nodes on: athensCanvas [ athensCanvas paintMode restoreAfter: [ "Set the stroke for all the nodes." - (athensCanvas setStrokePaint: nodeColor) - width: nodeBorderWidth. + (athensCanvas setStrokePaint: nodeColor) width: nodeBorderWidth. nodes do: [ :each | athensCanvas pathTransform restoreAfter: [ diff --git a/src/Hiedra/HiSpecExample.class.st b/src/Hiedra/HiSpecExample.class.st index c483c22..3d93537 100644 --- a/src/Hiedra/HiSpecExample.class.st +++ b/src/Hiedra/HiSpecExample.class.st @@ -78,12 +78,16 @@ HiSpecExample >> initializeWidgets [ "Configure hiedra controller" hiedraColumnController := HiColumnController new. - hiedraColumnController renderer - nodeRadius: 1.0; - nodeBorderWidth: 5.0; - rowHeight: rowHeight; - cellWidth: 8; - nodeColor: Smalltalk ui theme textColor. + "Increase the default value since Spec wants all Morphs initially." + hiedraColumnController pageSize: 1000. + hiedraColumnController renderer + rowHeight: rowHeight; + nodeRadius: 1.5; + nodeBorderWidth: 3.0; + arrowSize: 2.5; + nodeConnectionOffset: 3.5; + cellWidth: 8; + nodeColor: Smalltalk ui theme textColor. "Configure columns" tree columns: {