1998-07-27 23:14:50 +02:00
|
|
|
#!/bin/sh
|
|
|
|
|
|
|
|
# The user may have a tclsh they want to preserve
|
1999-05-26 02:34:26 +02:00
|
|
|
ver=`grep -a awieYJFnsuILOnfsYEW ${PKG_PREFIX}/bin/tclsh 2> /dev/null \
|
|
|
|
| sed -e 's/.*\*\*//'`
|
2000-05-31 19:45:53 +02:00
|
|
|
if [ ! -e ${PKG_PREFIX}/bin/tclsh ] || [ "$ver" != "" -a "$ver" -lt 002 ]
|
1998-07-27 23:14:50 +02:00
|
|
|
then
|
|
|
|
[ -f ${PKG_PREFIX}/bin/tclsh ] && chmod u+w ${PKG_PREFIX}/bin/tclsh
|
|
|
|
|
1998-11-28 01:20:48 +01:00
|
|
|
mkdir -p ${PKG_PREFIX}/bin
|
1998-07-27 23:14:50 +02:00
|
|
|
cat > ${PKG_PREFIX}/bin/tclsh <<'EOF'
|
|
|
|
#!/bin/sh
|
2000-05-31 19:45:53 +02:00
|
|
|
# Installed by ports system. id: awieYJFnsuILOnfsYEW**002
|
|
|
|
#
|
|
|
|
# $FreeBSD$
|
|
|
|
#
|
1998-07-27 23:14:50 +02:00
|
|
|
|
|
|
|
(
|
|
|
|
echo "In FreeBSD, tclsh is named with a version number. This is because"
|
|
|
|
echo "different versions of tclsh are not compatible with each other and"
|
|
|
|
echo "they can not all be called \"tclsh\"! You may need multiple versions"
|
|
|
|
echo "installed because a given port may depend on a specific version."
|
|
|
|
echo
|
|
|
|
echo "On your system, tclsh is installed under at least the following names:"
|
|
|
|
echo
|
2000-05-31 20:31:17 +02:00
|
|
|
for name in $(/bin/ls $(echo $PATH | sed 's/:/ /g') 2> /dev/null | egrep '^(i?tclsh[0-9]+\.[0-9]+(\_r)?([a-z][a-z])?)|otclsh$')
|
1998-07-27 23:14:50 +02:00
|
|
|
do
|
|
|
|
echo $name
|
|
|
|
done
|
|
|
|
[ "$name" = "" ] && echo "No tclsh installations found, sorry."
|
|
|
|
) 1>&2
|
|
|
|
exit 1
|
|
|
|
EOF
|
1999-05-26 02:34:26 +02:00
|
|
|
chmod 555 ${PKG_PREFIX}/bin/tclsh
|
1998-07-27 23:14:50 +02:00
|
|
|
fi
|