Looking at the source for Font.xs vs your code, your error looks odd indeed
and your code correct.
A couple of things:
Your code as written does not work at all, of course. It would have to be
my $size = 12;
$this->{greek_font} = Wx::Font->new( $size, wxMODERN, wxNORMAL, wxBOLD );
Are you quite sure you haven't typed in what you know the code should be,
rather than what it actually is?
Yes, this is what the code actually looks like. There is an assignment
statement to $size prior to calling Wx::Font->new.
Is '$size' in your code a Wx::Size object rather than a point size?
$size is assigned as a simple scalar in the program. This is what I
believe it is supposed to be as far as I can tell from the docs for
Wx::Font.
If checking out the above does not highlight the problem, what are the
versions of Wx and wxWidgets on the failing Linux box and the failing Windows
box ?
There are four machines that the program works on, three Linux boxes
and one Windows machine. The other two that I'm having the problem with
are a Linux machine and a Windows machine. All Linux boxes are running
Slackware Linux 12.0 with kernel version 2.6.21. wxWidgets version is
2.8.7 and wxPerl version is 0.83 on all machines.
The strange thing of course, is that the program works on four out of
the six machines that I've tried it on. One other thing that I have
noticed is that the Windows machine that doesn't run the program is a dual
boot machine that will boot either Win 2K or Win XP and the program does
not run under either one.
Keith Brown
Department of Chemistry/
Saskatchewan Structural Sciences Center
University of Saskatchewan
Saskatoon, Saskatchewan
306-966-1725
http://chem4823.usask.ca/kbrown.html
-----------------------------------------------------------------------
It is impossible to travel faster than light, and certainly not
desirable, as one's hat keeps blowing off.
-- Woody Allen
-----------------------------------------------------------------------
