clear_pane_button = function(x, y, r)
	return overflowable_button('clear', x, y, r,
		function()
			Show_menu = nil
			clear_pane()
		end)
end