1
0
Fork 0

- make it resizable

- cleanup
This commit is contained in:
mfranz 2009-02-09 22:27:26 +00:00
parent 44434783c8
commit 5bc6fb2c62

View file

@ -2,9 +2,10 @@
<PropertyList> <PropertyList>
<name>ufo-select</name> <name>ufo-select</name>
<resizable>true</resizable>
<layout>vbox</layout> <layout>vbox</layout>
<x>-20</x> <x>-20</x>
<pref-width>600</pref-width> <pref-width>300</pref-width>
<group> <group>
<layout>hbox</layout> <layout>hbox</layout>
@ -36,24 +37,26 @@
<nasal> <nasal>
<open> <open>
var self = cmdarg(); var self = cmdarg();
var list = self.getNode("list", 1); var list = self.getNode("list");
list.removeChildren("value"); list.removeChildren("value");
forindex (var i; ufo.modellist) { forindex (var i; ufo.modellist)
list.getChild("value", i, 1).setValue(ufo.modellist[i]); list.getChild("value", i, 1).setValue(ufo.modellist[i]);
}
</open> </open>
</nasal> </nasal>
<list> <list>
<halign>fill</halign> <halign>fill</halign>
<valign>fill</valign>
<stretch>true</stretch>
<padding>5</padding>
<pref-height>300</pref-height> <pref-height>300</pref-height>
<property>/cursor</property> <property>cursor</property>
<binding> <binding>
<command>dialog-apply</command> <command>dialog-apply</command>
</binding> </binding>
<binding> <binding>
<command>nasal</command> <command>nasal</command>
<script>ufo.modelmgr.set_modelpath(getprop("/cursor"))</script> <script>ufo.modelmgr.set_modelpath(getprop("cursor"))</script>
</binding> </binding>
</list> </list>
</PropertyList> </PropertyList>