anchor.diff:  		[{flag, ?wxEXPAND}]),
   
       CanvasSizer = wxBoxSizer:new(?wxHORIZONTAL),
  -    Canvas = wxPanel:new(Panel, []),
  +    Canvas = wxPanel:new(Panel, [{style, ?wxFULL_REPAINT_ON_RESIZE}]),
       {CanvasW,CanvasH} = wxPanel:getSize(Canvas),
       ScrollBar = wxScrollBar:new(Panel, ?wxID_ANY, [{style, ?wxSB_VERTICAL}]),
   
  
positive.code: %%
  %% %CopyrightBegin%
  %% 
  %% Copyright Ericsson AB 2000-2009. All Rights Reserved.
  %% 
  %% The contents of this file are subject to the Erlang Public License,
  %% Version 1.1, (the "License"); you may not use this file except in
  
negative.code: 
  clear_canvas(S) ->
      DC = wxClientDC:new(S#state.canvas),
      wxDC:setBackground(DC, ?wxWHITE_BRUSH), %% Needed on mac
      wxDC:clear(DC),
      {CanvasW, CanvasH} = wxPanel:getSize(S#state.canvas),
      wxSizer:recalcSizes(S#state.canvas_sizer),
  