Re: [perl-win32-gui-users] Actions not firing in Win32GUI

[<jez...@ho...>]

Hi,

For some reason I can't see the attached code, but I think I know what is going on. You are using the Old Event Model (OEM) which always assumes the event hndlers are in the main package space. To fix your problem prefix each event handler with :: or use the NEM (new event model).

Cheers,

Jeremy

--Original Message-----
From: "Maxmelbin Neson (RBIN/EMT1)" <Max...@in...>
To: "per...@li..." <per...@li...>
Sent: 22/08/07 07:20
Subject: [perl-win32-gui-users] Actions not firing in Win32GUI


Hello All,

I have a small perl win32 file which generates a GUI window, which
worked pretty fine.
Now, I converted it into a .pm file and called it from an other .pl fie.
The GUI still come up OK, but the actions are not firing .

The main code in the new setup is ..

BEGIN
{
    $0 =~ /^(.*)[\\\/][^\\\/]*$/;

    $path = $1 ? $1 : ".";

    unshift(@INC, $path);
}

use strict;
use ChviewGUI;

my $cwd = `cd`;
chomp($cwd);

&ChviewGUI::gui($cwd);

And the ChviewGUI.pm is attached here.
 <<ChviewGUI.pm>> 

Why is the actions not firing in this case ?
Thanks in advance for any help.

Thanks and Regards
Maxmelbin Neson
------------------------------------------------------------------------
-----------------------------------------
Robert Bosch India Limited
Engineering Services - DS - Methods and Tools (RBIN/EMT1)
123 Industrial Layout  -  Hosur Road -  Bangalore 560 095  -  INDIA
Telephone: +91 80 6657-4532	 Fax: +91 80 6657-1404
max...@in...
www.bosch.com