#!/usr/bin/perl -w
use strict;
use Wx;
use lib './t';
use Tests_Helper qw(in_frame);
use Test::More 'tests' => 3;
in_frame(
sub {
my $self = shift;
my $nbk = Wx::Notebook->new( $self, -1 );
my $szr = Wx::NotebookSizer->new( $nbk );
isa_ok( $szr, 'Wx::NotebookSizer' );
$self->SetSizer( $szr );
ok( 1, 'Got there' );
$self->Layout;
ok( 1, 'Got there too' );
} );