local_modifications_color = function(filename)
	return has_local_modifications(filename) and Local_modifications_color
end

Local_modifications_color = {r=0.8, g=0, b=0}

styled_button = function(name, x, y, onpress1, tooltip_text)

styled_button = function(name, x, y, onpress1, tooltip_text, fg)

				App.color(Normal_color)

				App.color(fg or Normal_color)

				File_dialog_callback(filename)
				reset_file_dialog_state()
			end)

					File_dialog_callback(filename)
					reset_file_dialog_state()
				end,
				--[[tooltip text]] nil,
				local_modifications_color(filename))

end

end

overflowable_button = function(name, x, y, r, onpress1, final_button, tooltip_text)

overflowable_button = function(name, x, y, r, onpress1, final_button, tooltip_text, fg)

	styled_button(name, x,y, onpress1, tooltip_text)

	styled_button(name, x,y, onpress1, tooltip_text, fg)

			App.color{r=0.8, g=0,b=0}

			App.color(Local_modifications_color)