Agh! I forgot to write a test for the cancel button! I'll look into it
- thanks for letting me know!
Cheers
Lee
clothohk@gmail.com via RT wrote:
Show quoted text> Queue: Tk-Wizard-Bases
> Ticket <URL:
http://rt.cpan.org/Ticket/Display.html?id=19394 >
>
> Hi,
>
> Thank you for your help. I have tested the new version. The resizing feature
> works now, Thank you :) . While the errors generated by Cancel changes to
> the following:
> ====================================
> destroy (1):
> 0 0x8d8fd34 RV f=00080503 {}(20)(1)
> SV = RV(0x8ee1cf4) at 0x8d8fd34
> REFCNT = 1
> FLAGS = (PADBUSY,PADMY,ROK)
> RV = 0x8991acc
> Tk::Error: Usage $widget->destroy(...) at
> /usr/lib/perl5/site_perl/5.8.5/Tk/Wizard.pm line 1096.
> Tk callback for .wizard.frame.button
> <ButtonRelease-1>
> (command bound to event)
> ====================================
>
> For your reference, here are the result of "make all test" in my RHEL4.
>
> [root@headnode Tk-Wizard-Bases-1.945]# make all test
> cp lib/Tk/Wizard/Image.pm blib/lib/Tk/Wizard/Image.pm
> cp lib/Tk/Wizard.pm blib/lib/Tk/Wizard.pm
> cp lib/Tk/Wizard/Installer.pm blib/lib/Tk/Wizard/Installer.pm
> cp lib/Tk/Wizard/Installer/Win32.pm blib/lib/Tk/Wizard/Installer/Win32.pm
> Manifying blib/man3/Tk::Wizard::Image.3pm
> Manifying blib/man3/Tk::Wizard.3pm
> Manifying blib/man3/Tk::Wizard::Installer.3pm
> Manifying blib/man3/Tk::Wizard::Installer::Win32.3pm
> PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e"
> "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
> t/05_Wizard.........ok
> t/06_AutoDestroy....ok 3/20# Showing a Wizard that is only one page long at
> /home/wytsang/perltk/Tk-Wizard-Bases-1.945/blib/lib/Tk/Wizard.pm line 563.
> t/06_AutoDestroy....ok
> t/10_Wizard.........ok
> t/20_bad_arg........ok 3/4addPage requires one or more CODE references as
> arguments at (eval 8) line 1
> t/20_bad_arg........ok
> t/25_TaskList.......ok 5/6Assuming 'require Tk::LabFrame;' at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/After.pm line 89
> t/25_TaskList.......ok
> t/30_pb.............ok 7/0Use of uninitialized value in hash element at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/Trace.pm line
> 181.
> t/30_pb.............ok
> t/40_Win32..........skipped
> all skipped: MSWin32 module on linux
> t/50_Installer......ok 15/16Use of uninitialized value in hash element at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/Trace.pm line
> 181.
> Use of uninitialized value in hash element at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/Trace.pm line
> 181.
> t/50_Installer......ok
> t/52_Installer......ok 1/18# No such file or directory
> # Looks like you planned 18 tests but only ran 1.
> t/52_Installer......dubious
> Test returned status 17 (wstat 4352, 0x1100)
> DIED. FAILED tests 2-18
> Failed 17/18 tests, 5.56% okay
> t/70_TopLevel.......ok
> t/99_prepost........ok
> Failed Test Stat Wstat Total Fail Failed List of Failed
> -------------------------------------------------------------------------------
> t/52_Installer.t 17 4352 18 34 188.89% 2-18
> 1 test skipped.
> Failed 1/11 test scripts, 90.91% okay. 17/154 subtests failed, 88.96% okay.
> make: *** [test_dynamic] Error 255
>
>
>
> 2006/6/19, lee via RT <bug-Tk-Wizard-Bases@rt.cpan.org>:
>
>
>
>
>
>
> ------------------------------------------------------------------------
>
> Hi,
>
> Thank you for your help. I have tested the new version. The resizing
> feature
> works now, Thank you :) . While the errors generated by Cancel changes to
> the following:
> ====================================
> destroy (1):
> 0 0x8d8fd34 RV f=00080503 {}(20)(1)
> SV = RV(0x8ee1cf4) at 0x8d8fd34
> REFCNT = 1
> FLAGS = (PADBUSY,PADMY,ROK)
> RV = 0x8991acc
> Tk::Error: Usage $widget->destroy(...) at
> /usr/lib/perl5/site_perl/5.8.5/Tk/Wizard.pm line 1096.
> Tk callback for .wizard.frame.button
> <ButtonRelease-1>
> (command bound to event)
> ====================================
>
> For your reference, here are the result of "make all test" in my RHEL4.
>
> [root@headnode Tk-Wizard-Bases-1.945]# make all test
> cp lib/Tk/Wizard/Image.pm blib/lib/Tk/Wizard/Image.pm
> cp lib/Tk/Wizard.pm blib/lib/Tk/Wizard.pm
> cp lib/Tk/Wizard/Installer.pm blib/lib/Tk/Wizard/Installer.pm
> cp lib/Tk/Wizard/Installer/Win32.pm blib/lib/Tk/Wizard/Installer/Win32.pm
> Manifying blib/man3/Tk::Wizard::Image.3pm
> Manifying blib/man3/Tk::Wizard.3pm
> Manifying blib/man3/Tk::Wizard::Installer.3pm
> Manifying blib/man3/Tk::Wizard::Installer::Win32.3pm
> PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e"
> "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
> t/05_Wizard.........ok
> t/06_AutoDestroy....ok 3/20# Showing a Wizard that is only one page
> long at
> /home/wytsang/perltk/Tk-Wizard-Bases-1.945/blib/lib/Tk/Wizard.pm line 563.
> t/06_AutoDestroy....ok
> t/10_Wizard.........ok
> t/20_bad_arg........ok 3/4addPage requires one or more CODE references
> as arguments at (eval 8) line 1
> t/20_bad_arg........ok
> t/25_TaskList.......ok 5/6Assuming 'require Tk::LabFrame;' at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/After.pm
> line 89
> t/25_TaskList.......ok
> t/30_pb.............ok 7/0Use of uninitialized value in hash element
> at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/Trace.pm
> line 181.
> t/30_pb.............ok
> t/40_Win32..........skipped
> all skipped: MSWin32 module on linux
> t/50_Installer......ok 15/16Use of uninitialized value in hash element
> at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/Trace.pm
> line 181.
> Use of uninitialized value in hash element at
> /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi/Tk/Trace.pm
> line 181.
> t/50_Installer......ok
> t/52_Installer......ok 1/18# No such file or directory
> # Looks like you planned 18 tests but only ran 1.
> t/52_Installer......dubious
> Test returned status 17 (wstat 4352, 0x1100)
> DIED. FAILED tests 2-18
> Failed 17/18 tests, 5.56% okay
> t/70_TopLevel.......ok
> t/99_prepost........ok
> Failed Test Stat Wstat Total Fail Failed List of Failed
> -------------------------------------------------------------------------------
> t/52_Installer.t 17 4352 18 34 188.89% 2-18
> 1 test skipped.
> Failed 1/11 test scripts, 90.91% okay. 17/154 subtests failed, 88.96%
> okay.
> make: *** [test_dynamic] Error 255
>
>
>
> 2006/6/19, lee via RT <bug-Tk-Wizard-Bases@rt.cpan.org
> <mailto:bug-Tk-Wizard-Bases@rt.cpan.org> >:
>
>
> <URL:
http://rt.cpan.org/Ticket/Display.html?id=19394 >
>
> This issue has been resolved, I think. Please check v 1.945 and let me
> know if you have any problems.
>
> Thanks
> Lee
>
>
>
>
> --
> 以琳
>
http://www.yauoichurch.org/elim <
http://www.yauoichurch.org/elim>
--
Lee Goddard, BA (Hons), MSc
www: LeeGoddard.net
tel: 0208 369 6832
ltd: Server-side Systems
ten: Ten years programming the net