[tcltk-perl] Re: Re[2]: Fwd: Re: Tcl and Tcl::Tk

[Paul F. <fa...@ca...>]

I get this error:

[falbe@ca4ad iPaq]$ tautotran.pl
Tcl error 'bad option "Font": must be cget or configure at /usr/lib/perl5/vendor_perl/5.8.3/i386-linux-thread-multi/Tcl.pm line 417.
' while invoking scalar result call:
        ". Font -family Helvetica -size -24" at /usr/lib/perl5/vendor_perl/5.8.3/i386-linux-thread-multi/Tcl.pm line 418
        Tcl::call('Tcl::Tk=SCALAR(0x804cde0)',.,'Font','-family','Helvetica','-size',-24) called at /usr/lib/perl5/site_perl/5.8.3/Tcl/Tk.pm line 2034
        Tcl::Tk::Widget::__ANON__('Tcl::Tk::Widget::MainWindow=SCALAR(0x80ea90c)','-family','Helvetica','-size',-24) called at /usr/lib/perl5/site_perl/5.8.3/Tcl/Tk.pm line 2040
        Tcl::Tk::Widget::AUTOLOAD called at /usr/lib/perl5/site_perl/5.8.3/Tcl/Tk.pm line 2338
        Tcl::Tk::Widget::MainWindow::AUTOLOAD('Tcl::Tk::Widget::MainWindow=SCALAR(0x80ea90c)','-family','Helvetica','-size',-24) called at ./tautotran.pl line 51

from 

   $largefont = $MW->Font(-family => 'Helvetica', -size => -24);

Any ideas?