<?xml version="1.0"?>

<PropertyList>
	<name>ufo-select</name>
	<layout>vbox</layout>
	<x>-20</x>
	<pref-width>600</pref-width>

	<group>
		<layout>hbox</layout>
		<empty><stretch>1</stretch></empty>

		<text>
			<label>Select model</label>
		</text>

		<empty><stretch>1</stretch></empty>

		<button>
			<pref-width>16</pref-width>
			<pref-height>16</pref-height>
			<legend></legend>
			<default>1</default>
			<keynum>27</keynum>
			<border>2</border>

			<binding>
				<command>nasal</command>
				<script>ufo.select_dialog.close()</script>
			</binding>
		</button>
	</group>

	<hrule/>

	<nasal>
		<open>
			var self = cmdarg();
			var list = self.getNode("list", 1);
			list.removeChildren("value");
			forindex (var i; ufo.modellist) {
				list.getChild("value", i, 1).setValue(ufo.modellist[i]);
			}
		</open>
	</nasal>

	<list>
		<halign>fill</halign>
		<pref-height>300</pref-height>
		<property>/cursor</property>
		<binding>
			<command>dialog-apply</command>
		</binding>
		<binding>
			<command>nasal</command>
			<script>ufo.modelmgr.set_modelpath(getprop("/cursor"))</script>
		</binding>
	</list>
</PropertyList>