On 2014-11-12 04:12:21, Kevin.Geng@imgtec.com wrote:
Show quoted text> Hi Slaven,
>
> Thanks you so much for your quick response and kindly help!
> The perl version is: 5.8.8/x86_64-linux-thread-multi
> The linux distribution is : 2.6.18-274.12.1.el5
> Distributor ID: CentOS
> Description: CentOS release 5.7 (Final)
> The log of "make test" is:
> --- cd pTk && make DEFINE="" LIBPERL_A="libperl.a" LINKTYPE="dynamic"
> OPTIMIZE="-O2 -g -pipe -Wall -Wp,-D_FORTIFY_SOURCE=2 -fexceptions
> -fstack-protector
> --param=ssp-buffer-size=4 -m64 -mtune=generic" PREFIX="/usr"
> PASTHRU_DEFINE=""
> PASTHRU_INC=""
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/pTk'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/pTk'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/pTk'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/pTk'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/pod'
> Manifying 101 pod documents
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/pod'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/demos'
> Manifying 1 pod document
> Manifying 2 pod documents
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/demos'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Xlib'
> make[2]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Xlib/X'
> make[2]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Xlib/X'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Xlib'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/WinPhoto'
> Manifying 1 pod document
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/WinPhoto'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Tixish'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Tixish'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/TixPixmap'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/TixPixmap'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/TixGrid'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/TixGrid'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/TextList'
> Manifying 1 pod document
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/TextList'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Text'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Text'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/TList'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/TList'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/Scrollbar'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/Scrollbar'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Scale'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Scale'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/PNG'
> Manifying 1 pod document
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/PNG'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/NBFrame'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/NBFrame'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Mwm'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Mwm'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/Menubutton'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/Menubutton'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Listbox'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Listbox'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/JPEG'
> Manifying 1 pod document
> Manifying 1 pod document
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/JPEG'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/InputO'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/InputO'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/IO'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/IO'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/HList'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/HList'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Event'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Event'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Entry'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Entry'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/DragDrop'
> Manifying 3 pod documents
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/DragDrop'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/Compound'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/Compound'
> make[1]: Entering directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Canvas'
> make[1]: Leaving directory
> `/home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-804.032/Canvas'
> /usr/bin/perl "-It" "-MTkTest" "-e" "checked_test_harness('./xt', 0,
> 'blib/lib', 'blib/arch')"
> ba67d70 is not a hash at
> /home/hxgeng/hxgeng/my_script/perl_xml/testing/tk/Tk-
> 804.032/blib/lib/Tk/MainWindow.pm
> line 53.
> make: *** [test_dynamic] Aborted
>
>
> Thanks
> Kevin
> -----Original Message-----
> From: Slaven_Rezic via RT [mailto:bug-Tk@rt.cpan.org]
> Sent: Wednesday, November 12, 2014 2:59 PM
> To: Kevin Geng
> Subject: [rt.cpan.org #100283] Bug about Tk
>
> <URL:
https://rt.cpan.org/Ticket/Display.html?id=100283 >
>
> On 2014-11-12 01:07:22, Kevin.Geng@imgtec.com wrote:
> > Hi,
> >
> > When I install Tk in linux platform, I found the following error when
> > execute "make test":
> >
> >
> > 17464da0 is not a hash at /usr/lib64/perl5/site_perl/5.8.8/x86_64-
> > linux-thread-multi/Tk/MainWindow.pm line 53.
> >
> > Abort
> >
> > Line 53 in MainWindow.pm is:
> > my $top = eval { bless Create($package->CreateArgs(\%args)),
> > $package
> > };
> >
> > After the installation, When I running perl script which use Tk.
> > It still report the above error message.
> >
> > Could you please help to debug this bug and how to fix it?
>
> Can you send me the log of "make test" and tell me the exact linux
> distribution you're using, along with the perl version?
Unfortunately I cannot reproduce the problem. I tried the latest Tk from github (there are not that many changes since 804.032 here) on a VM running CentOS 5.10 (I don't have older CentOS versions available), and the test suite runs without problems.
Does at least "perl -Mblib t/00wmcheck.t" run? If so, can you send me the output? Do you have freetype libraries and includes installed? Maybe you can try either XFT=0 or XFT=1 in the "perl Makefile.PL" line to turn freetype support on or off?