Bugzilla Bug 231874

when starting insight it fails with the following message:
Tk_Init failed: Can't find a usable tk.tcl in the following directories: 
    /usr/share/insight/tk8.4 /usr/lib/tk8.4 /lib/tk8.4 /usr/library /library
/tk8.4.1/library /tk8.4.1/library

/usr/share/insight/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 "/usr/share/insight/tk8.4/listbox.tcl" line 182)
    invoked from within
"source /usr/share/insight/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 "/usr/share/insight/tk8.4/tk.tcl" line 393)
    invoked from within
"source /usr/share/insight/tk8.4/tk.tcl"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list source $file]"
/usr/lib/tk8.4/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 package..."
    (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] || [catch {p..."
    (file "/usr/lib/tk8.4/tk.tcl" line 20)
    invoked from within
"source /usr/lib/tk8.4/tk.tcl"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list source $file]"


This probably means that tk wasn't installed properly.



Reproducible: Always

Steps to Reproduce:
1. emerge =dev-util/insight-6.8
2. start insight


Actual Results:  
It displays the message above.

Expected Results:  
It should have started insight

I have dev-lang/tk-8.4.18 installed

emerge --info
Portage 2.2_rc1 (default/linux/amd64/2008.0/desktop, gcc-4.3.1,
glibc-2.8_p20080602-r0, 2.6.23-gentoo x86_64)
=================================================================
System uname:
Linux-2.6.23-gentoo-x86_64-AMD_Athlon-tm-_64_Processor_3200+-with-glibc2.2.5
Timestamp of tree: Sun, 13 Jul 2008 12:45:01 +0000
distcc 2.18.3 x86_64-pc-linux-gnu (protocols 1 and 2) (default port 3632)
[disabled]
ccache version 2.4 [enabled]
app-shells/bash:     3.2_p39
dev-java/java-config: 1.3.7, 2.1.6-r1
dev-lang/python:     2.5.2-r5
dev-util/ccache:     2.4-r7
sys-apps/baselayout: 2.0.0
sys-apps/openrc:     0.2.5
sys-apps/sandbox:    1.2.18.1-r3
sys-devel/autoconf:  2.13, 2.62-r1
sys-devel/automake:  1.4_p6, 1.5, 1.7.9-r1, 1.8.5-r3, 1.9.6-r2, 1.10.1-r1
sys-devel/binutils:  2.18-r3
sys-devel/gcc-config: 1.4.0-r4
sys-devel/libtool:   2.2.4
virtual/os-headers:  2.6.25-r4
ACCEPT_KEYWORDS="amd64 ~amd64"
CBUILD="x86_64-pc-linux-gnu"
CFLAGS="-march=athlon64 -O2 -pipe"
CHOST="x86_64-pc-linux-gnu"
CONFIG_PROTECT="/etc /usr/kde/3.5/env /usr/kde/3.5/share/config
/usr/kde/3.5/shutdown /usr/share/config"
CONFIG_PROTECT_MASK="/etc/ca-certificates.conf /etc/env.d /etc/env.d/java/
/etc/fonts/fonts.conf /etc/gconf /etc/gentoo-release
/etc/php/apache2-php5/ext-active/ /etc/php/cgi-php5/ext-active/
/etc/php/cli-php5/ext-active/ /etc/revdep-rebuild /etc/terminfo
/etc/udev/rules.d"
CXXFLAGS="-march=athlon64 -O2 -pipe"
DISTDIR="/usr/portage/distfiles"
FEATURES="ccache distlocks parallel-fetch preserve-libs sandbox sfperms strict
unmerge-orphans userfetch"
GENTOO_MIRRORS="ftp://ftp.snt.utwente.nl/pub/os/linux/gentoo
ftp://mirror.switch.ch/mirror/gentoo/"
LANG="en_US.UTF-8"
LDFLAGS="-Wl,-O1"
LINGUAS="en en_GB nl"
PKGDIR="/usr/portage/packages"
PORTAGE_RSYNC_OPTS="--recursive --links --safe-links --perms --times --compress
--force --whole-file --delete --stats --timeout=180 --exclude=/distfiles
--exclude=/local --exclude=/packages"
PORTAGE_TMPDIR="/mnt/data1/tmp"
PORTDIR="/usr/portage"
PORTDIR_OVERLAY="/usr/local/portage /home/stefan/test/ebuilds"
SYNC="rsync://rsync.europe.gentoo.org/gentoo-portage"
USE="3dnow 3dnowext X a52 aac aalib acl acpi alsa amd64 apache2 arts audiofile
bash-completion berkdb bluetooth branding bzip2 cairo cdr cjk cli cracklib
crypt cups dbus dga dri dvd dvdr dvdread eds emboss emul-linux-x86 encode esd
evo exif ffmpeg firefox flac fortran ftp gd gdbm gif gnome gnutls gphoto2
gstreamer gtk hal iconv ipv6 isdnlog jabber jpeg jpeg2k kde kerberos libnotify
lm_sensors mad maildir midi mikmod mime mmx mng mp3 mpeg mudflap multilib
ncurses nls nptl nptlonly nsplugin ogg openal opengl openmp osc oss pam pcre
pdf perl php png posix ppds pppd python qt3 qt3support qt4 quicktime readline
reflection sdl seamonkey session spell spl sse sse2 ssl startup-notification
svg tcpd theora tiff truetype unicode usb utempter vhosts vorbis wmf xml xorg
xpm xv xvid zlib" ALSA_CARDS="ali5451 als4000 atiixp atiixp-modem bt87x ca0106
cmipci emu10k1x ens1370 ens1371 es1938 es1968 fm801 hda-intel intel8x0
intel8x0m maestro3 trident usb-audio via82xx via82xx-modem ymfpci"
ALSA_PCM_PLUGINS="adpcm alaw asym copy dmix dshare dsnoop empty extplug file
hooks iec958 ioplug ladspa lfloat linear meter mulaw multi null plug rate route
share shm softvol" APACHE2_MODULES="actions alias auth_basic auth_digest
authn_anon authn_dbd authn_dbm authn_default authn_file authz_dbm authz_default
authz_groupfile authz_host authz_owner authz_user autoindex cache dav dav_fs
dav_lock dbd deflate dir disk_cache env expires ext_filter file_cache filter
headers ident imagemap include info log_config logio mem_cache mime mime_magic
negotiation proxy proxy_ajp proxy_balancer proxy_connect proxy_http rewrite
setenvif so speling status unique_id userdir usertrack vhost_alias"
ELIBC="glibc" INPUT_DEVICES="keyboard mouse void" KERNEL="linux"
LCD_DEVICES="bayrad cfontz cfontz633 glk hd44780 lb216 lcdm001 mtxorb ncurses
text" LINGUAS="en en_GB nl" USERLAND="GNU" VIDEO_CARDS="nvidia nv dummy vesa
fbdev"
Unset:  CPPFLAGS, CTARGET, EMERGE_DEFAULT_OPTS, INSTALL_MASK, LC_ALL, MAKEOPTS,
PORTAGE_COMPRESS, PORTAGE_COMPRESS_FLAGS, PORTAGE_RSYNC_EXTRA_OPTS

*** This bug has been marked as a duplicate of bug 225999 ***

Using the same patch as described upstream and in bug #225999 (which works in
the case of sourcenav) doesn't appear to work for Insight, and the only
difference appears to be that sourcenav uses Tk-8.3 and Insight uses Tk-8.4. 
Note that this bug is not really a true duplicate, since patching the system Tk
has no effect on Insight.

So even with the equivalent of this patch applied to Insight's internal Tk:

http://bugs.gentoo.org/attachment.cgi?id=161242

it still fails to start with the infamous error below.  I'll play around with
it a little more, but I'm open to ideas...

$ /usr/bin/insight
Tk_Init failed: Can't find a usable tk.tcl in the following directories: 
    /usr/share/insight/tk8.4 /usr/lib/tk8.4 /lib/tk8.4 /usr/library /library
/tk                                                                             
8.4.1/library /tk8.4.1/library

/usr/share/insight/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 "/usr/share/insight/tk8.4/listbox.tcl" line 182)
    invoked from within
"source /usr/share/insight/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 "/usr/share/insight/tk8.4/tk.tcl" line 393)
    invoked from within
"source /usr/share/insight/tk8.4/tk.tcl"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list source $file]"
/usr/lib/tk8.4/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 package..."
    (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] || [catch {p..."
    (file "/usr/lib/tk8.4/tk.tcl" line 20)
    invoked from within
"source /usr/lib/tk8.4/tk.tcl"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list source $file]"


This probably means that tk wasn't installed properly.

This bug also happens in my ~amd64 box with insight 6.7.1-r1 / 6.8 and tcl+tk
8.4.19 / 8.5.6. However it isn't triggered in my x86 box with insight 6.7.1-r1
/ 6.8 and tck+tk 8.4.18 / 8.5.6. It looks like a deeper problem.

With the patch mentioned in comment #2 applied =dev-util/insight-6.7.1-r1 and
=dev-util/insight-6.8 do no longer fail to start on amd64. 

#3: Your versions of tk and tcl do not matter, because insight has its own
versions bundled. 

*** Bug 270631 has been marked as a duplicate of this bug. ***

Patch from comment #2 works on amd64

*** Bug 273205 has been marked as a duplicate of this bug. ***

Created an attachment (id=194428) [details]
Ebuild which applies comment 2 patch

Patch worked for me as well.

http://sourceware.org/insight/

News
July 19, 2009:

    Updated Insight 6.8-1 available 
    Insight 6.8 has been available for some time, and the current release
tarball has issues with newer versions of X11. As a result, I am making
available a patched Inisght 6.8-1 release which should fix all outstanding
issues with X11.