File: get-font-size.help.tcl

package info (click to toggle)
din 5.2.1-6
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 2,200 kB
  • sloc: cpp: 9,369; sh: 6,563; ansic: 2,977; tcl: 1,770; makefile: 283
file content (15 lines) | stat: -rw-r--r-- 496 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
set get-font-size(name) get-font-size
set get-font-size(short) gfs
set get-font-size(purpose) {get font size}
set get-font-size(invoke) {get-font-size OR gfs}
set get-font-size(help) {
  prints 4 numbers. for eg.,
  2 2 4 4 where
  xsize = x cell size = 2
  ysize = y cell size = 2
  charspc = number of cells between 2 characters = 4
  headroom = number of cells between two lines = 4
  }
set get-font-size(examples) {
  get-font-size ;# prints xsize ysize charspc headroom
  gfs ;# short name}