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();
#######################################################
Any idea?
Thanks.
Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
Harris Stratex Networks
mailto:Paul.Voyer [at] HSTX.com
------_=_NextPart_001_01C75134.DFC21C93
Content-Type: text/html;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Dus-ascii">
<META NAME=3D"Generator" CONTENT=3D"MS Exchange Server version =
6.5.7650.28">
<TITLE>getSaveFile</TITLE>
</HEAD>
<BODY>
<!-- Converted from text/rtf format -->
<P><FONT SIZE=3D2 FACE=3D"Arial">Hello all,</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">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 </FONT><A =
HREF=3D"http://www.ActiveState.com"><U><FONT COLOR=3D"#0000FF" SIZE=3D2 =
FACE=3D"Arial">http://www.ActiveState.com</FONT></U></A></P>
<P><FONT SIZE=3D2 FACE=3D"Arial">While I was using it in to 5.6 without =
any problem. In 5.8.8 the option -initialfile does not work!</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">I am running it on Windows XP =
sp2.</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">See the following simple code:</FONT>
<BR><FONT SIZE=3D2 =
FACE=3D"Arial">############################################# ##########</F=
ONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">use strict;</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">use Tk;</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">use Tk::Text;</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">my $top =3D =
MainWindow->new();</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">my $textwindow =3D =
$top->Text->pack;</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">my $savefilename =3D =
$textwindow->getSaveFile(-initialdir=3D>'c:\apps',</FONT>
<BR><FONT SIZE=3D2 =
FACE=3D"Arial"> &nbs=
p;  =
; =
=
-initialfil=3D>'afile.nam');</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">print $savefilename;</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">MainLoop(); </FONT>
<BR><FONT SIZE=3D2 =
FACE=3D"Arial">############################################# ##########</F=
ONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">Any idea?</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Arial">Thanks.</FONT>
</P>
<P><B><FONT SIZE=3D2 FACE=3D"Arial">Paul Voyer</FONT></B>
<BR><I><FONT SIZE=3D2 FACE=3D"Arial">System/DB/PDM =
Administrator</FONT></I>
<BR><I><FONT SIZE=3D2 FACE=3D"Arial">Specialist, Engineering =
Applications Support</FONT></I><SPAN LANG=3D"fr"></SPAN>
<BR><SPAN LANG=3D"fr"><FONT SIZE=3D2 FACE=3D"Arial">Harris Stratex =
Networks</FONT></SPAN>
<BR><SPAN LANG=3D"fr"></SPAN><A =
HREF=3D"mailto:Paul.Voyer [at] HSTX.com"><SPAN LANG=3D"fr"><U></U><U><FONT =
COLOR=3D"#0000FF" SIZE=3D2 =
FACE=3D"Arial">mailto:Paul.Voyer [at] HSTX.com</FONT></U></SPAN></A><SPAN =
LANG=3D"fr"></SPAN><SPAN LANG=3D"en-us"></SPAN>
</P>
</BODY>
</HTML>
------_=_NextPart_001_01C75134.DFC21C93--
--===============0637569111==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline
_______________________________________________
ActivePerl mailing list
ActivePerl [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
--===============0637569111==--
RE: getSaveFile
This is a multi-part message in MIME format.
--===============0586955208==
Content-class: urn:content-classes:message
Content-Type: multipart/alternative;
boundary="----_=_NextPart_001_01C7513A.029D5241"
This is a multi-part message in MIME format.
------_=_NextPart_001_01C7513A.029D5241
Content-Type: text/plain;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable
Yes you are right!
But fixing the "e" does not make it work!!!
I removed the 'e' to try something...
Thanks for the quick answer, but any other idea?
Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
mailto:Paul.Voyer [at] HSTX.com
________________________________
From: John Day [mailto:johnday [at] wordsnimages.com]
Sent: Thursday, February 15, 2007 2:41 PM
To: Voyer, Paul (Harris Stratex)
Subject: Re: getSaveFile
At 02:09 PM 2/15/2007, you wrote:
Content-class: urn:content-classes:message
Content-Type: multipart/alternative;
boundary=3D"----_=3D_NextPart_001_01C75134.DFC21C93"
=09
Hello all,
=09
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 <http://www.ActiveState.com>
=09
While I was using it in to 5.6 without any problem. In 5.8.8 the
option -initialfile does not work!
=09
I am running it on Windows XP sp2.
=09
See the following simple code:
#######################################################
use strict;
=09
use Tk;
use Tk::Text;
=09
my $top =3D MainWindow->new();
my $textwindow =3D $top->Text->pack;
my $savefilename =3D
$textwindow->getSaveFile(-initialdir=3D>'c:\apps',
-initialfile
=3D>'afile.nam');
print $savefilename;
=09
MainLoop();
#######################################################
=09
Any idea?
Yep, check your spelling! You are missing the 'e' off the end of
-initialfile
John
Thanks.
=09
Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
Harris Stratex Networks
mailto:Paul.Voyer [at] HSTX.com
_______________________________________________
ActivePerl mailing list
ActivePerl [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
------_=_NextPart_001_01C7513A.029D5241
Content-Type: text/html;
charset="us-ascii"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Dus-ascii">
<META content=3D"MSHTML 6.00.2900.2995" name=3DGENERATOR></HEAD>
<BODY>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007>Yes you are right!</SPAN></FONT></DIV>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007></SPAN></FONT> </DIV>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007>But fixing the "e" does not make it
work!!!</SPAN></FONT></DIV>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007></SPAN></FONT> </DIV>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007>I removed the 'e' to try
something...</SPAN></FONT></DIV>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007></SPAN></FONT> </DIV>
<DIV dir=3Dltr align=3Dleft><FONT face=3DArial color=3D#0000ff =
size=3D2><SPAN
class=3D703284219-15022007>Thanks for the quick answer, but =
a</SPAN></FONT><FONT
face=3DArial color=3D#0000ff size=3D2><SPAN =
class=3D703284219-15022007>ny other
idea?</SPAN></FONT></DIV>
<DIV><FONT face=3DArial color=3D#0000ff size=3D2></FONT> </DIV><!-- =
Converted from text/rtf format -->
<P><B><FONT face=3DArial size=3D2>Paul Voyer</FONT></B> <BR><I><FONT =
face=3DArial
size=3D2>System/DB/PDM Administrator</FONT></I> <BR><I><FONT =
face=3DArial
size=3D2>Specialist, Engineering Applications Support</FONT></I><SPAN
lang=3Dfr></SPAN> <BR><SPAN lang=3Dfr><FONT face=3DArial size=3D2><A
href=3D"mailto:Paul.Voyer [at] HSTX.com">mailto:Paul.Voyer [at] HSTX.c om</A></FONT>=
</SPAN><SPAN
lang=3Den-us></SPAN> </P>
<DIV> </DIV><BR>
<DIV class=3DOutlookMessageHeader lang=3Den-us dir=3Dltr align=3Dleft>
<HR tabIndex=3D-1>
<FONT face=3DTahoma size=3D2><B>From:</B> John Day =
[mailto:johnday [at] wordsnimages.com]
<BR><B>Sent:</B> Thursday, February 15, 2007 2:41 PM<BR><B>To:</B> =
Voyer, Paul
(Harris Stratex)<BR><B>Subject:</B> Re: getSaveFile<BR></FONT><BR></DIV>
<DIV></DIV><BR>At 02:09 PM 2/15/2007, you wrote:<BR>
<BLOCKQUOTE class=3Dcite cite=3D"" type=3D"cite">Content-class:
urn:content-classes:message<BR>Content-Type:
=
multipart/alternative;<BR><X-TAB> &nbs=
p; </X-TAB>
boundary=3D"----_=3D_NextPart_001_01C75134.DFC21C93"<BR><BR><FONT =
size=3D2>Hello
all,</FONT> <BR><BR><FONT size=3D2>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 </FONT><A =
href=3D"http://www.ActiveState.com"><FONT
color=3D#0000ff =
size=3D2><U>http://www.ActiveState.com</A><BR></U></FONT><BR><FONT
size=3D2>While I was using it in to 5.6 without any problem. In 5.8.8 =
the option
-initialfile does not work!</FONT> <BR><BR><FONT size=3D2>I am running =
it on
Windows XP sp2.</FONT> <BR><BR><FONT size=3D2>See the following simple =
code:</FONT> <BR><FONT
=
size=3D2>################################################### ####</FONT>
<BR><FONT size=3D2>use strict;</FONT> <BR><BR><FONT size=3D2>use =
Tk;</FONT>
<BR><FONT size=3D2>use Tk::Text;</FONT> <BR><BR><FONT size=3D2>my $top =
=3D
MainWindow->new();</FONT> <BR><FONT size=3D2>my $textwindow =3D
$top->Text->pack;</FONT> <BR><FONT size=3D2>my $savefilename =3D =
$textwindow->getSaveFile(-initialdir=3D>'c:\apps',</FONT> =
<BR><FONT
=
size=3D2> &nbs=
p;  =
; =
-initialfil<SPAN class=3D703284219-15022007><FONT face=3DArial
color=3D#0000ff>e </FONT></SPAN>=3D>'afile.nam');</FONT> =
<BR><FONT
size=3D2>print $savefilename;</FONT> <BR><BR><FONT =
size=3D2>MainLoop();
</FONT><BR><FONT
=
size=3D2>################################################### ####</FONT>
<BR><BR><FONT size=3D2>Any idea?</FONT> </BLOCKQUOTE><BR>Yep, check =
your spelling!
You are missing the 'e' off the end of =
-initialfile<BR><BR>John<BR><BR><BR><BR>
<BLOCKQUOTE class=3Dcite cite=3D"" type=3D"cite"><FONT =
size=3D2>Thanks.</FONT>
<BR><BR><FONT size=3D2><B>Paul Voyer</B></FONT> <BR><FONT
size=3D2><I>System/DB/PDM Administrator</I></FONT> <BR><FONT
size=3D2><I>Specialist, Engineering Applications Support</I></FONT> =
<BR><FONT
size=3D2>Harris Stratex Networks</FONT> <BR><FONT color=3D#0000ff =
size=3D2><U><A
=
href=3D"mailto:Paul.Voyer [at] HSTX.com">mailto:Paul.Voyer [at] HSTX.c om</A></U></F=
ONT>
<BR>_______________________________________________<BR>ActivePerl =
mailing
list<BR>ActivePerl [at] listserv.ActiveState.com<BR>To unsubscribe: <A
href=3D"http://listserv.activestate.com/mailman/mysubs"
=
eudora=3D"autourl">http://listserv.ActiveState.com/mailman/m ysubs</A></BL=
OCKQUOTE></BODY></HTML>
------_=_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 [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
--===============0586955208==--
Re: getSaveFile
Voyer, Paul (Harris Stratex) wrote:
> 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.
....
> Any idea?
Works OK for me on 811. What are your symptoms ?
_______________________________________________
ActivePerl mailing list
ActivePerl [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: getSaveFile
Okay! I have more information...
The -initialfile does not appear in the "File name: " field.
Now doing more test with that, I have the same version of Perl and Tk
installed on different machines this is working fine on those. The
difference now is about the installed modules.
How can I know which module is causing my problem or force Perl to use
the specific original module?
Thanks,
Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
Harris Stratex Networks
mailto:Paul.Voyer [at] HSTX.com
-----Original Message-----
From: Bill Luebkert [mailto:dbecoll [at] roadrunner.com]
Sent: Thursday, February 15, 2007 6:54 PM
To: Voyer, Paul (Harris Stratex)
Cc: ActivePerl [at] listserv.ActiveState.com
Subject: Re: getSaveFile
Voyer, Paul (Harris Stratex) wrote:
> 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.
....
> Any idea?
Works OK for me on 811. What are your symptoms ?
_______________________________________________
ActivePerl mailing list
ActivePerl [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: getSaveFile
Found a solution!
Completely uninstalled Perl and did clean re-install of everything.
It is working fine now.
Probably my Perl installation was corrupted.
Thanks All,
Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
Harris Stratex Networks
mailto:Paul.Voyer [at] HSTX.com
-----Original Message-----
From: activeperl-bounces [at] listserv.ActiveState.com
[mailto:activeperl-bounces [at] listserv.ActiveState.com] On Behalf Of Voyer,
Paul (Harris Stratex)
Sent: Friday, February 16, 2007 8:35 AM
To: Bill Luebkert
Cc: ActivePerl [at] listserv.ActiveState.com
Subject: RE: getSaveFile
Okay! I have more information...
The -initialfile does not appear in the "File name: " field.
Now doing more test with that, I have the same version of Perl and Tk
installed on different machines this is working fine on those. The
difference now is about the installed modules.
How can I know which module is causing my problem or force Perl to use
the specific original module?
Thanks,
Paul Voyer
System/DB/PDM Administrator
Specialist, Engineering Applications Support
Harris Stratex Networks
mailto:Paul.Voyer [at] HSTX.com
-----Original Message-----
From: Bill Luebkert [mailto:dbecoll [at] roadrunner.com]
Sent: Thursday, February 15, 2007 6:54 PM
To: Voyer, Paul (Harris Stratex)
Cc: ActivePerl [at] listserv.ActiveState.com
Subject: Re: getSaveFile
Voyer, Paul (Harris Stratex) wrote:
> 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.
....
> Any idea?
Works OK for me on 811. What are your symptoms ?
_______________________________________________
ActivePerl mailing list
ActivePerl [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
ActivePerl mailing list
ActivePerl [at] listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs