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...
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/

- Raw text -