/usr/share/tkrat2.2/font.tcl is in tkrat 1:2.2cvs20100105-true-dfsg-6.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 | # font.tcl --
#
# Handles cataloguing and selection of fonts
#
#
# TkRat software and its included text is Copyright 1996-2004 by
# Martin Forssén
#
# The full text of the legal notice is contained in the file called
# COPYRIGHT, included with this distribution.
# AddFont --
#
# Add a font to the list of known fonts.
#
# Arguments:
# encoding - The encoding of this font
# size - The size difference from "normal"
# attributes - The attributes
# name - The name of the font
proc AddFont {encoding size attributes name} {
return
}
# RemoveFonts --
#
# Remove slected fonts from the list of known fonts.
# We currently ignore the problem that some encodings may become unsupported
#
# Arguments:
# name - Name of fonts to remove (may be regexp)
proc RemoveFonts {name} {
return
}
|