Client for playing 300 publicly available Sokoban puzzles on a computer or phone.
refresh_file_dialog_input_start = function()
	local len = utf8.len(File_dialog_input_text)
	for start=0,len do
		local s = File_dialog_input_text:sub(start)
		if Font:getWidth(s) < File_dialog_input_right_margin-15 then
			File_dialog_input_draw_suffix = s
			return
		end
	end
	assert(false, "refresh_file_dialog_input_start isn't working right")
end