X-Recipient: archive-cygwin AT delorie DOT com
X-Spam-Check-By: sourceware.org
Message-ID: <4879B6A8.1010904@gmail.com>
Date: Sun, 13 Jul 2008 18:02:48 +1000
From: thefinn <thefinn12345 AT gmail DOT com>
User-Agent: Thunderbird 2.0.0.14 (Windows/20080421)
MIME-Version: 1.0
To: cygwin AT cygwin DOT com
Subject: perl-Tk and the hours of work...
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-IsSubscribed: yes
Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Id: <cygwin.cygwin.com>
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sourceware.org/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sourceware.org/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com

On linux this particular perl-Tk app works just fine.

However, perl-Tk on cygwin seems to disagree?

Not entirely sure why, or what the issue is. It's just in development 
phase (ignore the sql errors, they are unimportant).

Output below:

$ ./console.pl
DBI connect('console_scan:127.0.0.1','silly',...) failed: Can't connect 
to MySQL
server on '127.0.0.1' (111) at ./console.pl line 364
DBI connect('console_expl:127.0.0.1','silly',...) failed: Can't connect 
to MySQL
server on '127.0.0.1' (111) at ./console.pl line 365
Tk::Error: Can't set -activebackground to `undef' for 
Tk::Menu=HASH(0x1fba660):
Cannot use undef value for object of type 'border' at 
/usr/lib/perl5/vendor_perl
/5.10/i686-cygwin/Tk/Configure.pm line 46.
 at /usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Derived.pm line 294
 Tk callback for .
 Tk callback for .frame
 Tk::Derived::configure at 
/usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Derive
d.pm line 306
 Tk::Widget::new at 
/usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Widget.pm lin
e 205
 Tk::Widget::__ANON__ at 
/usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Widget.p
m line 256
 Tk::Menubutton::menu at 
/usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Menubutt
on.pm line 348
 Tk::Menubutton::command at 
/usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Menub
utton.pm line 359
 main::mainmenu at ./console.pl line 30
Can't set -activebackground to `undef' for Tk::Menu=HASH(0x1fba660): 
Cannot use
undef value for object of type 'border' at 
/usr/lib/perl5/vendor_perl/5.10/i686-
cygwin/Tk/Configure.pm line 46.
 at /usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Derived.pm line 294

 at /usr/lib/perl5/vendor_perl/5.10/i686-cygwin/Tk/Derived.pm line 306

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/