//  SuperTux Editor
//  Copyright (C) 2006 Matthias Braun <matze@braunis.de>
//
//  This program is free software: you can redistribute it and/or modify
//  it under the terms of the GNU General Public License as published by
//  the Free Software Foundation, either version 3 of the License, or
//  (at your option) any later version.
//
//  This program is distributed in the hope that it will be useful,
//  but WITHOUT ANY WARRANTY; without even the implied warranty of
//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//  GNU General Public License for more details.
//
//  You should have received a copy of the GNU General Public License
//  along with this program.  If not, see <http://www.gnu.org/licenses/>.

using System;
using LispReader;
using Gtk;

/// <summary>
/// A widget used to open a dialog box to
/// edit scripts in (and currently also other multi line strings).
/// </summary>
public sealed class EditScriptWidget : CustomSettingsWidget
{
	public override Widget Create(object caller)
	{
		Button button = new Button("Edit Script");
		button.Clicked += OnEdit;
		button.Name = Field.Name;

		// Create a tooltip if we can.
		CreateToolTip(caller, button);
		return button;
	}

	private void OnEdit(object sender, EventArgs args)
	{
		new ScriptEditor(Object.GetType() + " : " + Field.Name, Field, Object);
	}
}

[AttributeUsage(AttributeTargets.Field | AttributeTargets.Property,
                AllowMultiple=false)]
public sealed class EditScriptSetting : CustomSettingsWidgetAttribute
{
	public EditScriptSetting() : base(typeof(EditScriptWidget))
	{
	}
}

/* EOF */
