Prevent flickering

This commit is contained in:
Alessandro Ranellucci 2015-12-15 17:10:10 +01:00
parent 21364b7cd1
commit c73378744f
3 changed files with 5 additions and 4 deletions

View file

@ -25,7 +25,7 @@ sub new {
sub _repaint {
my ($self) = @_;
my $dc = Wx::PaintDC->new($self);
my $dc = Wx::AutoBufferedPaintDC->new($self);
my ($cw, $ch) = $self->GetSizeWH;
return if $cw == 0; # when canvas is not rendered yet, size is 0,0