BrowseForFolder trouble

[Tony Auerbach]

I'm trying to use the use the BrowseForFolder fucntion in the 
Tk::Win32::FileOp package and perl is crashing.  It's the usual Windows 
"illegal operation" message and the details begin with "PERL caused an 
invalid page fault in module SHELL32.DLL at 016f:7fd07775."

The OpenDialog fuction works fine.  Is anyone successfully using 
BrowseForFolder?  Is it my code or a bug in the module?  Here is a sample 
of code that will always crash.

use Tk;
use Tk::Win32::FileOp;

$mw = new MainWindow;

$mw->Button(-text => 'Dir', 
            -command => sub { 
              $newdir = $mw->BrowseForFolder();
              print "$newdir\n";
              }
              )->pack;

MainLoop;

Thanks,
Tony

---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]