From: Vadim V K. <vad...@ga...> - 2025-01-26 18:40:28
|
Hi, Now I can confirm that current version of Perl/Tcl module (module itself is named Tcl) is actually ok in its current version 1.50, plus I've just released a bit cleaned-up version 1.51, but 1.50 also ok. I tried on debian and all tests are good, except some minor failure: t/text.t ........ version conflict for package "Tk": have 9.0.0, need 8.4 at /home/vad/.cpan/build/Tcl-Tk-1.29-0/blib/lib/Tcl/Tk.pm line 942. (I will look into this problem later, the failing code is a fallback when tcl/tk setup does not have widget::scrolledwindow package, so Perl/Tcl-Tk provides the missing scrollw.tcl file) The difficulty I am still having is with windows usage against BAWT build of Tcl: perl -Mblib -MTcl -we "my $i = new Tcl;$i->Init;$i->Eval('puts $auto_path;package require tk;pack [button .b];tk_messageBox -title 123')" //zipfs:/lib/tcl/tcl_library //zipfs:/lib/tcl C:/vad/perl-dev/strawberry-perl-5.38.0.1-64bit-portable/perl/lib can't find package tk at -e line 1. So here 'tk' package failed to be located. Then I add the tk path to the auto_path list, and the problem goes away: perl -Mblib -MTcl -we "my $i = new Tcl;$i->Init;$i->Eval('lappend auto_path C:/vad/apps/Tcl-bawt-bi-901-64/lib;puts $auto_path;package require tk;pack [button .b];tk_messageBox -title 123')" //zipfs:/lib/tcl/tcl_library //zipfs:/lib/tcl C:/vad/perl-dev/strawberry-perl-5.38.0.1-64bit-portable/perl/lib C:/vad/apps/Tcl-bawt-bi-901-64/lib (I see message box and empty button here) Should I need to add more initialization steps here? To say, I can't find the init.tcl file in BAWT directory. Thanks in advance, Vadim |