getSaveFile

This is a multi-part message in MIME format.

--===============0637569111==
Content-class: urn:content-classes:message
Content-Type: multipart/alternative;
boundary="----_=_NextPart_001_01C75134.DFC21C93"

This is a multi-part message in MIME format.

------_=_NextPart_001_01C75134.DFC21C93
Content-Type: text/plain;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

Hello all,

I am trying to use getSaveFile in ActivePerl version: v5.8.8 built for
MSWin32-x86-multi-thread, Binary build 819 [267479] provided by
ActiveState http://www.ActiveState.com
While I was using it in to 5.6 without any problem. In 5.8.8 the option
-initialfile does not work!

I am running it on Windows XP sp2.

See the following simple code:
#######################################################
use strict;

use Tk;
use Tk::Text;

my $top =3D MainWindow->new();
my $textwindow =3D $top->Text->pack;
my $savefilename =3D $textwindow->getSaveFile(-initialdir=3D>'c:\apps',
-initialfil=3D>'afile.nam');
print $savefilename;

MainLoop();=20
#######################################################

Any idea?

Thanks.

Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
Harris Stratex Networks
mailto:Paul.Voyer@HSTX.com


------_=_NextPart_001_01C75134.DFC21C93
Content-Type: text/html;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable




charset=3Dus-ascii">
6.5.7650.28">

Hello all,

I am trying to use getSaveFile in =
ActivePerl version: v5.8.8 built for MSWin32-x86-multi-thread, Binary =
build 819 [267479] provided by ActiveState HREF=3D"http://www.ActiveState.com"> FACE=3D"Arial">http://www.ActiveState.com

While I was using it in to 5.6 without =
any problem. In 5.8.8 the option -initialfile does not work!

I am running it on Windows XP =
sp2.

See the following simple code:


FACE=3D"Arial">############################################# ########## ONT>


use strict;

Content-class:=20
urn:content-classes:message
Content-Type:=20
=
multipart/alternative;
      &nbs=
p; =20
boundary=3D"----_=3D_NextPart_001_01C75134.DFC21C93"

size=3D2>Hello=20
all,

I am trying to use getSaveFile in =
ActivePerl=20
version: v5.8.8 built for MSWin32-x86-multi-thread, Binary build 819 =
[267479]=20
provided by ActiveState href=3D"http://www.ActiveState.com"> color=3D#0000ff =
size=3D2>http://www.ActiveState.com

size=3D2>While I was using it in to 5.6 without any problem. In 5.8.8 =
the option=20
-initialfile does not work!

I am running =
it on=20
Windows XP sp2.

See the following simple =

code:
=
size=3D2>################################################### ####=20

use strict;

use =
Tk;=20

use Tk::Text;

my $top =
=
MainWindow->new();
my $textwindow =
$top->Text->pack;
my $savefilename =3D =

$textwindow->getSaveFile(-initialdir=3D>'c:\apps', =

=
size=3D2>          &nbs=
p;            =
;            =
        =20
-initialfil color=3D#0000ff>e =3D>'afile.nam'); =

size=3D2>print $savefilename;

size=3D2>MainLoop();=20

=
size=3D2>################################################### ####=20


Any idea?

size=3D2>Thanks.=20


Paul Voyer
size=3D2>System/DB/PDM Administrator
size=3D2>Specialist, Engineering Applications Support =

size=3D2>Harris Stratex Networks
size=3D2> =
href=3D"mailto:Paul.Voyer@HSTX.com">mailto:Paul.Voyer@HSTX.c om ONT>=20

_______________________________________________
ActivePerl =
mailing=20
list
ActivePerl@listserv.ActiveState.com
To unsubscribe: href=3D"http://listserv.activestate.com/mailman/mysubs"=20
=
eudora=3D"autourl">http://listserv.ActiveState.com/mailman/m ysubs OCKQUOTE>

------_=_NextPart_001_01C7513A.029D5241--

--===============0586955208==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
--===============0586955208==--