anchor.diff:  
   init([]) ->
   	wx:new(),
  -	{Frame} = create_window(),
  +	MainWindow = create_window(),
   	gen_server:cast(data_buffer, {subscribe, self()}),
  -	{ok, #state{win = Frame}}.
  +	{ok, #state{win = MainWindow}}.
   
   terminate(_Reason, _State) ->
   	io:format("~p Cleaning up~n", [self()]),
  
positive.code: %% ===================================================================
  
  create_window() ->
  	Frame = wxFrame:new(wx:null(), 
  			-1, % window id
  			"erledit", % window title
  			[{size, {600, 400}}]),
  	
  	wxFrame:createStatusBar(Frame),
  	ok = wxFrame:setStatusText(Frame, ""),
  
  	%% Subscribe to events.
  	wxFrame:connect(Frame, close_window),
  	wxFrame:connect(Frame, char),
  
  	wxWindow:show(Frame),
  	{Frame}.
  
negative.code: 	io:format("~p Got Call ~p~n", [self(), Msg]),
  	{reply, ok, State}.
  
  handle_cast({buffer, Buffer}, #state{win = #main_window{window = Window}} = State) ->
  	%% TODO: Update text by triggering paint events instead, setting updated areas as dirty.
  	DC = wxClientDC:new(Window),
  	ok = wxDC:clear(DC),
  	ok = wxDC:drawText(DC, Buffer, {0, 0}),
  	wxClientDC:destroy(DC),
  