编译amsn成功，但是启动出错[已解决]

jiyongguang

出错代码如下：
Application initialization failed: Can't find a usable tk.tcl in the following directories:
    /usr/lib/tcl8.4/tk8.4 /usr/lib/tk8.4 /lib/tk8.4 /usr/library /library /tk8.4.18/library

/usr/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
    }"
    invoked from within
"if {[tk windowingsystem] eq "classic" || [tk windowingsystem] eq "aqua"} {
    bind Listbox <MouseWheel> {
        %W yview scroll [expr {- (%D)}] uni..."
    (file "/usr/lib/tk8.4/listbox.tcl" line 181)
    invoked from within
"source /usr/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 {$tcl_platform(platform) eq "macintosh"} {
        proc ::tk::SourceLibFile {file} {
            if {[catch {
                namespace eval :: ..."
    (file "/usr/lib/tk8.4/tk.tcl" line 407)
    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.

Error in startup script: no event type or button # or keysym
    while executing
"bind Pixmapscroll <MouseWheel> {
        tk::ScrollByUnits %W v [expr {- (%D)}]
    }"
    invoked from within
"if {![catch {tk windowingsystem} wsystem] && $wsystem == "x11"} {
    bind Pixmapscroll <MouseWheel> {
        tk::ScrollByUnits %W v [expr {- (%D)}]
..."
    (file "pixmapscroll.tcl" line 717)
    invoked from within
"source [file join pixmapscroll.tcl]"
    ("package ifneeded" script)
    invoked from within
"package require pixmapscroll"
    invoked from within
"if { $initialize_amsn == 1 } {

        if {![::picture:oaded]} {
                if { [OnDarwin] } {       
                        tk_messageBox -default ok -message "There's a problem loading a..."
    (file "gui.tcl" line 4)
    invoked from within
"source gui.tcl                "
    ("uplevel" body line 23)
    invoked from within
"uplevel \#0 {

        # amsncore.tcl is already loaded but we'll re-source it here in case we manually do reload_files
        source amsncore.tcl
        source audio.tc..."
    (procedure "reload_files" line 2)
    invoked from within
"reload_files"
    (file "/usr/bin/amsn" line 272)


emerge --info么如下：
"X a52 acl acpi alsa bash-completion berkdb bzip2 cjk cli cracklib crypt cups dbus dri ffmpeg fortran freefonts gdbm gpm gtk gtk2 hal iconv intel ipv6 isdnlog jpeg jpg midi mmx motif mp3 mudflap ncurses nls nptl nptlonly opengl openmp pam pcre perl png pppd python readline reflection session spl sse sse2 ssl tcpd truetype type1 unicode x86 xft xml2 xorg xulrunner xvid zlib" ALSA_CARDS="hda-intel" 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 authn_alias authn_anon 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 deflate dir disk_cache env expires ext_filter file_cache filter headers include info log_config logio mem_cache mime mime_magic negotiation rewrite setenvif speling status unique_id userdir usertrack vhost_alias" ELIBC="glibc" INPUT_DEVICES="keyboard mouse" KERNEL="linux" LCD_DEVICES="bayrad cfontz cfontz633 glk hd44780 lb216 lcdm001 mtxorb ncurses text" LINGUAS="en_GB zh_CN zh_TW zh" USERLAND="GNU" VIDEO_CARDS="vesa i810"
Unset:  CPPFLAGS, CTARGET, EMERGE_DEFAULT_OPTS, INSTALL_MASK, LC_ALL, PORTAGE_COMPRESS, PORTAGE_COMPRESS_FLAGS, PORTAGE_RSYNC_EXTRA_OPTS

亞利艾爾

http://bugs.gentoo.org/show_bug.cgi?id=230621

jiyongguang

已解决，附件是补丁包，和ebuild