In-progress browser for a directory of text files
initialize_file_picker = function()
	Files = App.files(Data_dir)
	for i=#Files,1,-1 do
		if not Files[i]:match('%.md$') then
			table.remove(Files, i)
		end
	end
	table.sort(Files)
	Global_state.file_picker = {}
	for _,f in ipairs(Files) do
		table.insert(Global_state.file_picker, {
			type='text',
			data={{data=f}},
			rx=5,
			bg={r=0.7, g=0.7, b=1.0},
			border={r=0.4, g=0.4, b=0.7}
		})
	end
end