t/font.t: don't fail if only one font family is available

Previously the test passed only if two or more font families were
available, due to a wrong comparison operator.

This should fix https://rt.cpan.org/Ticket/Display.html?id=99411
Tk::Text: don't insert ctrl and meta key presses

Only <Alt-KeyPress> was bound to NoOp, but not <Meta-KeyPress> or
<Control-KeyPress>

This should fix https://github.com/eserte/perl-tk/issues/9