X-Git-Url: http://nitlanguage.org

diff --git a/src/model/model_viz.nit b/src/model/model_viz.nit
index 20be8c3..a8a1345 100644
--- a/src/model/model_viz.nit
+++ b/src/model/model_viz.nit
@@ -154,10 +154,10 @@ class MProjectDot
 	end
 
 	# Should groups be shown as clusters?
-	var cluster_group writable = true
+	var cluster_group = true is writable
 
 	# Should projects be shown as clusters?
-	var project_group writable = true
+	var project_group = true is writable
 
 	# Recursively generate noed ans clusters for a mroup
 	private fun dot_cluster(o: OStream, mgroup: MGroup)