preinst is in tcl 8.6.0+9.
This file is a maintainer script. It is executed when installing (*inst) or removing (*rm) the package.
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 | #!/bin/sh
set -e
case "$1" in
install|upgrade)
# Currently the alternatives mechanism is not used
if dpkg --compare-versions "$2" lt-nl "8.6.0+2"; then
update-alternatives --remove-all tclsh || true
fi
;;
abort-upgrade)
;;
*)
echo "preinst called with unknown argument \`$1'" >&2
exit 1
;;
esac
|