Package: perl-tk
Version: 1:804.027-7
Severity: important
The following script generates a core dump in the TK::HList code.
#!/usr/bin/perl
use strict;
use warnings;
use Tk;
use Tk::Tree;
my $mw = MainWindow->new(-title => "Editor" );
my $tree = $mw->Scrolled('Tree',
-scrollbars => 'se', -width => 30,
)->pack(-fill => 'both', -expand => 1);
$tree->add('show_one', -text => 'one', -data => ['toolbar']);
$tree->add('show_one.two', -text => 'two', -data => ['button']);
$tree->add('show_one.three', -after => 'show_one.two',
-text => 'two', -data => ['button']);
MainLoop;
exit 0;
Works correctly when the -after is removed. Confirmed under both testing
and etch.
Backtrace is:
[EMAIL PROTECTED]:~/HEAD/mm/amx/alpha$ gdb /usr/bin/perl core.20701
GNU gdb 6.6.90.20070912-debian
Copyright (C) 2007 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later
<http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law. Type "show
copying"
and "show warranty" for details.
This GDB was configured as "i486-linux-gnu"...
Using host libthread_db library "/lib/libthread_db.so.1".
warning: core file may not match specified executable file.
warning: Can't read pathname for load map: Input/output error.
Reading symbols from /lib/libdl.so.2...done.
Loaded symbols for /lib/libdl.so.2
Reading symbols from /lib/libm.so.6...done.
Loaded symbols for /lib/libm.so.6
Reading symbols from /lib/libpthread.so.0...done.
Loaded symbols for /lib/libpthread.so.0
Reading symbols from /lib/libc.so.6...done.
Loaded symbols for /lib/libc.so.6
Reading symbols from /lib/libcrypt.so.1...done.
Loaded symbols for /lib/libcrypt.so.1
Reading symbols from /lib/ld-linux.so.2...done.
Loaded symbols for /lib/ld-linux.so.2
Reading symbols from /usr/lib/perl5/auto/Tk/Event/Event.so...done.
Loaded symbols for /usr/lib/perl5/auto/Tk/Event/Event.so
Reading symbols from /usr/lib/perl/5.8.8/auto/Cwd/Cwd.so...done.
Loaded symbols for /usr/lib/perl/5.8/auto/Cwd/Cwd.so
Reading symbols from /usr/lib/perl/5.8.8/auto/Encode/Encode.so...done.
Loaded symbols for /usr/lib/perl/5.8/auto/Encode/Encode.so
Reading symbols from /usr/lib/perl5/auto/Tk/Tk.so...done.
Loaded symbols for /usr/lib/perl5/auto/Tk/Tk.so
Reading symbols from /usr/lib/libX11.so.6...done.
Loaded symbols for /usr/lib/libX11.so.6
Reading symbols from /usr/lib/libXau.so.6...done.
Loaded symbols for /usr/lib/libXau.so.6
Reading symbols from /usr/lib/libXdmcp.so.6...done.
Loaded symbols for /usr/lib/libXdmcp.so.6
Reading symbols from /usr/lib/perl5/auto/Tk/HList/HList.so...done.
Loaded symbols for /usr/lib/perl5/auto/Tk/HList/HList.so
Reading symbols from /usr/lib/gconv/ISO8859-1.so...done.
Loaded symbols for /usr/lib/gconv/ISO8859-1.so
Reading symbols from
/usr/lib/perl/5.8.8/auto/Encode/Unicode/Unicode.so...done.
Loaded symbols for /usr/lib/perl/5.8/auto/Encode/Unicode/Unicode.so
Reading symbols from
/usr/lib/perl5/auto/Tk/Scrollbar/Scrollbar.so...done.
Loaded symbols for /usr/lib/perl5/auto/Tk/Scrollbar/Scrollbar.so
Reading symbols from /usr/lib/libXcursor.so.1...done.
Loaded symbols for /usr/lib/libXcursor.so.1
Reading symbols from /usr/lib/libXrender.so.1...done.
Loaded symbols for /usr/lib/libXrender.so.1
Reading symbols from /usr/lib/libXfixes.so.3...done.
Loaded symbols for /usr/lib/libXfixes.so.3
Core was generated by `/usr/bin/perl ./tree_core.pl'.
Program terminated with signal 6, Aborted.
#0 0xb7d9d7d6 in raise () from /lib/libc.so.6
(gdb) bt
#0 0xb7d9d7d6 in raise () from /lib/libc.so.6
#1 0xb7d9f0f1 in abort () from /lib/libc.so.6
#2 0xb7be875a in ?? () from /usr/lib/perl5/auto/Tk/HList/HList.so
#3 0x0846a830 in ?? ()
#4 0x08430728 in ?? ()
#5 0x084ae068 in ?? ()
#6 0x084ad908 in ?? ()
#7 0x084ad7e8 in ?? ()
#8 0x084a0b78 in ?? ()
#9 0x00000005 in ?? ()
#10 0xb7beb649 in ?? () from /usr/lib/perl5/auto/Tk/HList/HList.so
#11 0x08154b90 in ?? ()
#12 0x00000000 in ?? ()
-- System Information:
Debian Release: lenny/sid
APT prefers testing
APT policy: (500, 'testing')
Architecture: i386 (i686)
Kernel: Linux 2.6.22-2-686 (SMP w/2 CPU cores)
Locale: LANG=en_CA, LC_CTYPE=en_CA (charmap=ISO-8859-1)
Shell: /bin/sh linked to /bin/bash
Versions of packages perl-tk depends on:
ii libc6 2.6.1-1+b1 GNU C Library: Shared libraries
ii libjpeg62 6b-14 The Independent JPEG Group's JPEG
ii libpng12-0 1.2.15~beta5-3 PNG library - runtime
ii libx11-6 2:1.0.3-7 X11 client-side library
ii perl 5.8.8-11.1 Larry Wall's Practical Extraction
ii perl-base [perlapi-5.8. 5.8.8-11.1 The Pathologically Eclectic Rubbis
ii zlib1g 1:1.2.3.3.dfsg-6 compression library - runtime
perl-tk recommends no packages.
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
