function statusbar(msg)
%STATUSBAR Display a message in the statusbar

%
% Copyright (c) 1995 by Claudio Rivetti and Mark Young
% claudio@alice.uoregon.edu,    mark@alice.uoregon.edu
%

global txt_sb SB_frame Uibgcolor Handlefig


if nargin<1
	SB_frame = uicontrol(Handlefig, 'Style', 'frame',...
		'units', 'normalized',...
		'Position', [0 0 1 0.08],...
		'tag', 'statusbarui',...
		'BackgroundColor', Uibgcolor);
	txt_sb = uicontrol(Handlefig, 'Style', 'text',...
		'String', [],...
		'units', 'normalized',...
		'Position', [0.01 0.002 0.98 0.03],...
		'HorizontalAlignment', 'left',...
		'BackgroundColor', Uibgcolor,...
		'tag', 'statusbarui',...
		'ForegroundColor', 'blue');

else
  msg=strrep(msg,'\','/');
  set(txt_sb, 'String', msg);
  drawnow;
end