Hi Laurence,
I want to correct your script because it's mixing a bit Perl and Tcl
style syntax, and I want a "canonical" version for others.
On 23/02/2010 6:18 AM, Laurence Anthony wrote:
I reinstalled the latest ActiveTcl and the tclsh85 script worked as you
described. tkkit went from 3081KB to 3135KB. However, one line that
Yes, it is expected to increase somewhat.
Here is the complete script (that seemed to work):
package require vfs ; # necessary for the vfs::mk4::Mount command
set tkkit "C:/Perl/lib/auto/Tcl/tkkit.dll" ; # set to correct path
file attributes $tkkit -readonly 0 ; # needs to be writable
vfs::mk4::Mount $tkkit tkkit ; # mounts file as dir 'tkkit'
# modify to where you installed Tcl, with lib subdir
set tcllib "C:/Tcl/lib"
# this is one of the built-in $::auto_path search areas
set tkkitlib "tkkit/lib"
# path to tkdnd lib files, complete with pkgIndex.tcl
set tkdnd "$tcllib/tkdnd2.0"
file copy -force $tkdnd $tkkitlib
vfs::unmount tkkit
exit
I next rewrote my Perl script removing the "lappend" hack and things
worked on my computer.
Success! That's good.
But, when I tried to compile with PerlApp
everything went smoothly (with one warning) until I tried to test the
executable, which produced an error:
Can't create
'C:\DOCUME~1\Anthony\LOCALS~1\Temp\pdk-Anthony/auto/Tcl/Tcl.dll':
Permission denied at perlapp line 894.
I'll leave this to Jan to answer this, but first thing is to get your
full PerlApp command line.
Jeff
