Juergen Sawinski:

package/base/tcl/tcl.conf

@@ -0,0 +1,28 @@
+# --- ROCK-COPYRIGHT-NOTE-BEGIN ---
+# 
+# This copyright note is auto-generated by ./scripts/Create-CopyPatch.
+# Please add additional copyright information _after_ the line containing
+# the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by
+# the ./scripts/Create-CopyPatch script. Do not edit this copyright text!
+# 
+# ROCK Linux: rock-src/package/x11/tcltk/tcltk.conf
+# ROCK Linux is Copyright (C) 1998 - 2003 Clifford Wolf
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version. A copy of the GNU General Public
+# License can be found at Documentation/COPYING.
+# 
+# Many people helped and are helping developing ROCK Linux. Please
+# have a look at http://www.rocklinux.org/ and the Documentation/TEAM
+# file for details.
+# 
+# --- ROCK-COPYRIGHT-NOTE-END ---
+
+. $base/package/base/tcl/tcl_config.sh
+
+hook_add preconf 3 "cd unix" 
+hook_add postinstall 3 'ln -vsf tclsh8.4 $bindir/tclsh'
+hook_add postinstall 3 "ln -vsf libtcl`tcl_libver $ver`.so $libdir/libtcl.so"
+

package/base/tcl/tcl.desc

@@ -0,0 +1,44 @@
+
+[COPY] --- ROCK-COPYRIGHT-NOTE-BEGIN ---
+[COPY] 
+[COPY] This copyright note is auto-generated by ./scripts/Create-CopyPatch.
+[COPY] Please add additional copyright information _after_ the line containing
+[COPY] the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by
+[COPY] the ./scripts/Create-CopyPatch script. Do not edit this copyright text!
+[COPY] 
+[COPY] ROCK Linux: rock-src/package/x11/tcltk/tcltk.desc
+[COPY] ROCK Linux is Copyright (C) 1998 - 2003 Clifford Wolf
+[COPY] 
+[COPY] This program is free software; you can redistribute it and/or modify
+[COPY] it under the terms of the GNU General Public License as published by
+[COPY] the Free Software Foundation; either version 2 of the License, or
+[COPY] (at your option) any later version. A copy of the GNU General Public
+[COPY] License can be found at Documentation/COPYING.
+[COPY] 
+[COPY] Many people helped and are helping developing ROCK Linux. Please
+[COPY] have a look at http://www.rocklinux.org/ and the Documentation/TEAM
+[COPY] file for details.
+[COPY] 
+[COPY] --- ROCK-COPYRIGHT-NOTE-END ---
+
+[I] The Tcl scripting language
+
+[T] Tcl provides a powerful platform for creating integration
+[T] applications that tie together diverse applications, protocols,
+[T] devices, and frameworks. 
+
+[U] http://dev.scriptics.com/scripting/
+
+[A] University of California, Sun Microsystems, Inc., Scriptics Corporation
+[M] Rene Rebe <rene@rocklinux.org>
+
+[C] extra/development extra/tool extra/shell
+
+[L] OpenSource
+[S] Stable
+[V] 8.4.6
+[P] X -----5---9 119.000
+
+[D] 2447310976 tcl8.4.6-src.tar.gz  ftp://tcl.activestate.com/pub/tcl/tcl8_4/
+
+

package/base/tcl/tcl_config.sh

@@ -0,0 +1,43 @@
+# tcl_fixdoc $pkg -- documentation (man pages) fixes (common amoung tcl related packages)  
+tcl_fixdoc() {
+	[ -f Makefile.in ] \
+		&& sed -i "s,\(MAN[13N]_INSTALL_DIR)\)/\$\$i,\\1/\$\${i}$1,g" \
+			Makefile.in
+	[ -f mkLinks ] \
+		&& sed -i "s,\([.][13n]\),\\1$1,g" \
+			mkLinks
+	return 0
+}
+
+# tcl_libver $ver -- converts version into major.minor format
+tcl_libver() {
+	echo $1 | cut -d . -f 1-2
+}
+
+# tcl_prepare_source pkg -- unpacks source needed to build derived tcl packages
+tcl_prepare_source() { 
+	while [ "$1" ]; do
+		pushd ..
+			local derpkg=$1 derver=`tcl_pkgversion $1` ; shift
+
+			tar $taropt $base/download/mirror/${derpkg:0:1}/$derpkg$derver?src.*bz2
+
+			ln -svf $derpkg$derver $derpkg`tcl_libver $derver`
+
+			cd $derpkg$derver ; [ -d unix ] && cd unix
+			./configure --enable-shared
+		popd
+	done
+} 
+
+# tcl_pkgversoin pkg -- grep the version from 'pkg'
+#FIXME is there maybe a function in scripts/functions for this?
+tcl_pkgversion() {
+	egrep '[[](V|VER|VERSION)[]]' $base/package/*/$1/$1.desc | sed 's,[^]]*[]],,' \
+		| tr '\t' ' ' | tr -s ' ' | sed -e 's,^[ ]*,,; s,[ ]*$,,;' 
+}
+
+# common hooks and confopts for tcl derived packages
+hook_add preconf 9 "tcl_fixdoc $pkg" 
+
+extraconfopt="--enable-shared" 

package/x11/tcltk/tcltk.desc

@@ -41,7 +41,7 @@
 [L] OpenSource
 [S] Stable
 [V] 8.4.4
-[P] X -----5---9 119.000
+[P] O -----5---9 119.000
 
 [D] 2059488128 tcl8.4.4-src.tar.gz  ftp://tcl.activestate.com/pub/tcl/tcl8_4/
 [D] 2035285416 tk8.4.4-src.tar.gz   ftp://tcl.activestate.com/pub/tcl/tcl8_4/

package/x11/tk/tk.conf

@@ -0,0 +1,28 @@
+# --- ROCK-COPYRIGHT-NOTE-BEGIN ---
+# 
+# This copyright note is auto-generated by ./scripts/Create-CopyPatch.
+# Please add additional copyright information _after_ the line containing
+# the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by
+# the ./scripts/Create-CopyPatch script. Do not edit this copyright text!
+# 
+# ROCK Linux: rock-src/package/x11/tcltk/tcltk.conf
+# ROCK Linux is Copyright (C) 1998 - 2003 Clifford Wolf
+# 
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version. A copy of the GNU General Public
+# License can be found at Documentation/COPYING.
+# 
+# Many people helped and are helping developing ROCK Linux. Please
+# have a look at http://www.rocklinux.org/ and the Documentation/TEAM
+# file for details.
+# 
+# --- ROCK-COPYRIGHT-NOTE-END ---
+
+. $base/package/base/tcl/tcl_config.sh
+
+hook_add preconf 1 'tcl_prepare_source tcl'
+hook_add preconf 3 "cd unix" 
+hook_add postinstall 3 'ln -vsf wish8.4 $bindir/wish'
+hook_add postinstall 3 "ln -vsf libtk`tcl_libver $ver`.so $libdir/libtk.so"

package/x11/tk/tk.desc

@@ -0,0 +1,44 @@
+
+[COPY] --- ROCK-COPYRIGHT-NOTE-BEGIN ---
+[COPY] 
+[COPY] This copyright note is auto-generated by ./scripts/Create-CopyPatch.
+[COPY] Please add additional copyright information _after_ the line containing
+[COPY] the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by
+[COPY] the ./scripts/Create-CopyPatch script. Do not edit this copyright text!
+[COPY] 
+[COPY] ROCK Linux: rock-src/package/x11/tcltk/tcltk.desc
+[COPY] ROCK Linux is Copyright (C) 1998 - 2003 Clifford Wolf
+[COPY] 
+[COPY] This program is free software; you can redistribute it and/or modify
+[COPY] it under the terms of the GNU General Public License as published by
+[COPY] the Free Software Foundation; either version 2 of the License, or
+[COPY] (at your option) any later version. A copy of the GNU General Public
+[COPY] License can be found at Documentation/COPYING.
+[COPY] 
+[COPY] Many people helped and are helping developing ROCK Linux. Please
+[COPY] have a look at http://www.rocklinux.org/ and the Documentation/TEAM
+[COPY] file for details.
+[COPY] 
+[COPY] --- ROCK-COPYRIGHT-NOTE-END ---
+
+[I] The Tk toolkit
+
+[T] Tcl paired with the Tk toolkit provides the fastest and most powerful
+[T] way to create GUI applications that run on PCs, Unix, and the Macintosh.
+[T] Tcl can also be used for a variety of web-related tasks and for creating
+[T] powerful command languages for applications.
+
+[U] http://dev.scriptics.com/scripting/
+
+[A] University of California, Sun Microsystems, Inc., Scriptics Corporation
+[M] Rene Rebe <rene@rocklinux.org>
+
+[C] extra/development base/x11
+
+[L] OpenSource
+[S] Stable
+[V] 8.4.6
+[P] X -----5---9 119.000
+
+[D] 381318742 tk8.4.6-src.tar.gz   ftp://tcl.activestate.com/pub/tcl/tcl8_4/
+