[perl-win32-gui-users] possible problem with GetOpenFilename

[Sam <sa...@se...>]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

can anyone out there recreate this:

from perl call
my $filename = Win32::GUI::GetOpenFileName(
	-filter => [
		"File type 1" => "*.ft1",
		"File type 2" => "*.ft2",
	],
);

now call this twice. The first time it works wonderfully, the second 
time it causes my program to exit, and this is displayed:
Out of memory!
Callback called exit.
(I believe the message is from the perl interpreter rather than win32-
gui).

I'd be interested to hear if anyone is using this function with 
success (multiple times), as it may be a problem purely with my 
build of win32-gui (0.0502) or perl (5.60).

It doesn't seem to happen unless you specify a filter. All the other 
options work perfectly.


-----BEGIN PGP SIGNATURE-----
Version: N/A

iQA/AwUBOlyPOZsRND2Z+TaWEQIaMACglCnO6IUWinq3Edjli6FiNt1RtfIAn15U
CFa6ZCfkum4t9xQ8cVoqE5Be
=mQaa
-----END PGP SIGNATURE-----

Sam Jacobson
R & D Manager / Software Engineer
Selective Communications
Ph +64 9 302 1142
www.selective.co.nz