summaryrefslogtreecommitdiffstats
path: root/virtual-programs
diff options
context:
space:
mode:
authorAndrés Cuervo <acwervo@gmail.com>2023-04-03 17:23:07 +0000
committerAndrés Cuervo <acwervo@gmail.com>2023-04-03 17:23:07 +0000
commit217dc9121284cc8b07b1c4f53fa07fe4cfee2104 (patch)
treeb4cbe27f206323005567c5f622c832dcebaa3296 /virtual-programs
parentAdd circle to pi Display, center shapes correctly (diff)
downloadfolk-217dc9121284cc8b07b1c4f53fa07fe4cfee2104.tar.gz
folk-217dc9121284cc8b07b1c4f53fa07fe4cfee2104.zip
Thin out default shapes
Diffstat (limited to 'virtual-programs')
-rw-r--r--virtual-programs/shapes.folk4
1 files changed, 2 insertions, 2 deletions
diff --git a/virtual-programs/shapes.folk b/virtual-programs/shapes.folk
index f5bbaf41..f5c913aa 100644
--- a/virtual-programs/shapes.folk
+++ b/virtual-programs/shapes.folk
@@ -64,9 +64,9 @@ proc shape {numPoints x y r {color white} {filled false} args} {
lappend points [list $x $y]
}
if {$filled} {
- polyline $points 5 $color
- } else {
polyline $points 10 $color
+ } else {
+ polyline $points 2 $color
}
}