sub resizeMainWindow($$) {
	my ($width, $height) = @_;
	$mainWin->configure(-width => $width, -height => $height);
}