Index: openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl,v
diff -u -r1.8.2.11 -r1.8.2.12
--- openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl	12 Aug 2022 16:41:15 -0000	1.8.2.11
+++ openacs-4/packages/xowf/tcl/xowf-form-field-procs.tcl	25 Nov 2022 19:17:02 -0000	1.8.2.12
@@ -24,7 +24,7 @@
     set ctx [::xowf::Context new -destroy_on_cleanup -object ${:object} \
                  -all_roles true -in_role none \
                  -workflow_definition [:value] ]
-    return [$ctx as_graph -dpi [:dpi] -style "max-width: 35%;"]
+    return [$ctx as_graph -dpi ${:dpi} -style "max-width: 20%;"]
   }
 
   workflow_definition instproc check=workflow {value} {