File: 02_use.t

package info (click to toggle)
libwx-perl 1%3A0.9909-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 3,912 kB
  • sloc: cpp: 9,728; perl: 8,182; ansic: 626; makefile: 41
file content (20 lines) | stat: -rwxr-xr-x 443 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
#!/usr/bin/perl -w

use lib '../../../t';
use Test::More ( $^O eq 'MSWin32' && $] == 5.008000 ) ?
               ( 'skip_all' => 'Bug with Win32 WM_TIMER handling in 5.8.0' ) :
               ( 'tests' => 1 );

use Wx::Perl::SplashFast '../../../wxpl.xpm', 800;
use Wx 'wxTheApp';

ok( 1, "use Splashfast with arguments" );

use Tests_Helper qw(app_timeout);

app_timeout( 500 );
wxTheApp->MainLoop();

# local variables:
# mode: cperl
# end: