Lines Matching refs:cols
56 set cols 80 ;# number of columns in term
133 set env(COLUMNS) $cols
211 stty rows $rows columns $cols < $spawn_out(slave,name)
217 -relief sunken -bd 1 -width $cols -height $rows -wrap none -setgrid 1
252 global cols cur_col cur_row
258 set space_rem_on_line [expr $cols - $cur_col]
267 global rows cols cur_row cur_col term
270 set blankline [format %*s $cols ""]\n
285 global rows cols term
288 if {$colsNew > $cols} {
291 } elseif {$colsNew < $cols} {
305 global cur_row rows cols term
317 $term insert end [format %*s $cols ""]\n
326 $term insert $cur_row.0 [format %*s $cols ""]\n
333 global cur_row rows cols term
348 global cols cur_col cur_row
352 set space_rem_on_line [expr $cols - $cur_col]
393 while {$chars_rem_to_write >= $cols} {
395 $term insert $cur_row.0 [string range $s 0 [expr $cols-1]]
399 set s [string range $s $cols end]
400 incr chars_rem_to_write -$cols
506 scan [wm geometry .] "%dx%dx" rows cols
507 stty rows $rows columns $cols < $spawn_out(slave,name)
510 # term_resize $rows $cols