poll_results { -bar_color "blue" -display_values_p "t" -display_scale_p "t" -bar_height "15" } resultsWhat it does:
Defined in: /web/philip/tcl/poll-defs.tcl
Source code:
arg_parser_for_poll_results $args if { [llength $results] != 0 } { set result [gr_sideways_bar_chart -bar_color_list [list $bar_color] -display_values_p $display_values_p -display_scale_p $display_scale_p -bar_height $bar_height $results] } else { set result "" } return $result