how to setup tcl/tk8.4 on fedora 10?

[julianLiuRsch]

Fedora 10 is shipped with tcl/tk 8.5.3.
But I need to use a software OMNET++, which needs tcl/tk8.4.0. So I decide to install tcl/tk8.4.0 on fedora10.

The steps I took was : ( my home is /home/julian )
for tcl
1. extract tcl8.4.0 to ~/program/tcl8.4.0
2. enter the unix subdirectory, and ./configure --prefix=/home/julian/program/tcl8.4.0
3. make; make install

for tk
1. extract tk8.4.0 to ~/program/tk8.4.0
2. enter the unix subdirectory, and ./configure --with-tcl=/home/julian/program/tcl8.4.0/unix --prefix=/home/julian/program/tk8.4.0
3. make; make install

At last, I ran the command
---
/home/julian/program/tk8.4.0/bin/wish8.4 /home/julian/program/tk8.4.0/lib/tk8.4/tk.tcl
===
and I got a very long error, as given below, does any one know what is happening?
---
/home/julian/program/tk8.4.0/lib/tk8.4/tk.tcl: no event type or button # or keysym
no event type or button # or keysym
while executing
"bind Listbox <MouseWheel> {
%W yview scroll [expr {- (%D / 120) * 4}] units
}"
(file "/home/julian/program/tk8.4.0/lib/tk8.4/listbox.tcl" line 182)
invoked from within
"source /home/julian/program/tk8.4.0/lib/tk8.4/listbox.tcl"
(in namespace eval "::" script line 1)
invoked from within
"namespace eval :: [list source [file join $::tk_library $file.tcl]]"
(procedure "SourceLibFile" line 2)
invoked from within
"SourceLibFile listbox"
(in namespace eval "::tk" script line 4)
invoked from within
"namespace eval ::tk {
SourceLibFile button
SourceLibFile entry
SourceLibFile listbox
SourceLibFile menu
SourceLibFile panedwindow
SourceLibFile ..."
invoked from within
"if {$::tk_library ne ""} {
if {[string equal $tcl_platform(platform) "macintosh"]} {
proc ::tk::SourceLibFile {file} {
if {[catch {
namesp..."
(file "/home/julian/program/tk8.4.0/lib/tk8.4/tk.tcl" line 399)
invoked from within
"source /home/julian/program/tk8.4.0/lib/tk8.4/tk.tcl"
("uplevel" body line 1)
invoked from within
"uplevel #0 [list source $file]"
/home/julian/program/tk8.4.0/library/tk.tcl: can't import command "mc": already exists
can't import command "mc": already exists
while executing
"namespace import ::msgcat::mc"
(in namespace eval "::tk::msgcat" script line 21)
invoked from within
"namespace eval msgcat {
namespace export mc mcmax
if {[interp issafe] || [catch {package require msgcat}]} {
# The msgcat..."
(in namespace eval "::tk" script line 3)
invoked from within
"namespace eval ::tk {
# Set up the msgcat commands
namespace eval msgcat {
namespace export mc mcmax
if {[interp issafe] || [..."
(file "/home/julian/program/tk8.4.0/library/tk.tcl" line 20)
invoked from within
"source /home/julian/program/tk8.4.0/library/tk.tcl"
("uplevel" body line 1)
invoked from within
"uplevel #0 [list source $file]"
/home/julian/program/tk8.4.0/library/tk.tcl: can't import command "mc": already exists
can't import command "mc": already exists
while executing
"namespace import ::msgcat::mc"
(in namespace eval "::tk::msgcat" script line 21)
invoked from within
"namespace eval msgcat {
namespace export mc mcmax
if {[interp issafe] || [catch {package require msgcat}]} {
# The msgcat..."
(in namespace eval "::tk" script line 3)
invoked from within
"namespace eval ::tk {
# Set up the msgcat commands
namespace eval msgcat {
namespace export mc mcmax
if {[interp issafe] || [..."
(file "/home/julian/program/tk8.4.0/library/tk.tcl" line 20)
invoked from within
"source /home/julian/program/tk8.4.0/library/tk.tcl"
("uplevel" body line 1)
invoked from within
"uplevel #0 [list source $file]"


This probably means that tk wasn't installed properly.

Error in startup script: can't import command "mc": already exists
while executing
"namespace import ::msgcat::mc"
(in namespace eval "::tk::msgcat" script line 21)
invoked from within
"namespace eval msgcat {
namespace export mc mcmax
if {[interp issafe] || [catch {package require msgcat}]} {
# The msgcat..."
(in namespace eval "::tk" script line 3)
invoked from within
"namespace eval ::tk {
# Set up the msgcat commands
namespace eval msgcat {
namespace export mc mcmax
if {[interp issafe] || [..."
(file "./tk.tcl" line 20)
===
thanks in advance!