From c7d44c90dc8aae9eb84ae0ef326b45ae9dcd453b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Mart=C3=ADn=20Dias?= Date: Tue, 19 Mar 2019 20:40:58 -0300 Subject: [PATCH] Fix Spec example + little formatting --- src/Hiedra/HiSimpleRenderer.class.st | 3 +-- src/Hiedra/HiSpecExample.class.st | 16 ++++++++++------ 2 files changed, 11 insertions(+), 8 deletions(-) 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: {