The following script shows how to display the contents of a simple Tcl dict within a gnocl::list widget. #!/bin/sh # the next line restarts using tclsh \ exec tclsh "$0" "$@" package require Gnocl namespace eval pkg {} #--------------- # Create a gnocl::list displaying the contents of a Tcl dict. #--------------- # Arguments: # val dict data to display. # args # Returns: # wid of gnocl::list containing the dict data. # proc pkg::dict2list { vals } { set res "" # get a complete list of info keys set c key dict for {id info} $vals { foreach {a b} $info { if { [string first $a $c] == -1 } { lappend c $a } } } set headings [lsort -unique $c] set res [gnocl::list -titles $c] # populate the list dict for {id info} $vals { set row2 [string repeat "{} " [llength $c]] set row2 [lreplace $row2 0 0 $id] foreach {a b} $info {