Commit | Line | Data |
8fde61e3 |
1 | # SDL::OpenGL.pm |
2 | # |
3 | # SFont bitmat font support |
4 | # |
5 | # Copyright (C) 2004 David J. Goehrig |
6 | |
7 | package SDL::SFont; |
8 | |
9 | require Exporter; |
10 | require DynaLoader; |
11 | use vars qw( |
12 | @EXPORT |
13 | @ISA |
14 | ); |
15 | @ISA=qw(Exporter DynaLoader); |
16 | |
17 | use SDL; |
18 | |
19 | BEGIN { |
20 | |
21 | }; |
22 | |
23 | sub SDL_TEXTWIDTH { |
24 | return SDL::SFont::TextWidth(join('',@_)); |
25 | } |
26 | |
27 | |
28 | bootstrap SDL::SFont; |
29 | |
30 | 1; |
31 | |
32 | __END__; |
33 | |
34 | =pod |
35 | |
36 | |
37 | |
38 | =head1 NAME |
39 | |
40 | SDL::SFont - a perl extension |
41 | |
42 | =head1 DESCRIPTION |
43 | |
44 | |
45 | |
46 | =head1 AUTHOR |
47 | |
48 | David J. Goehrig |
49 | |
50 | =head1 SEE ALSO |
51 | |
52 | L<perl> L<SDL::App> |
53 | |
54 | =cut |