added a new databinding friendly tag that works like <f:hetero-list> except...

added a new databinding friendly tag that works like <f:hetero-list> except this only lets you select one instance from many descriptors.

git-svn-id: https://hudson.dev.java.net/svn/hudson/trunk/hudson/main@24698 71c3de6d-444a-0410-be80-ed276b4c234a

core/src/main/resources/lib/form/hetero-radio.jelly

+<!--
+The MIT License
+
+Copyright (c) 2004-2009, Sun Microsystems, Inc., Kohsuke Kawaguchi
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.
+-->
+
+<j:jelly xmlns:j="jelly:core" xmlns:st="jelly:stapler" xmlns:d="jelly:define" xmlns:l="/lib/layout" xmlns:t="/lib/hudson" xmlns:f="/lib/form" xmlns:local="local">
+  <st:documentation>
+    Sibling of hetero-list, which only allows the user to pick one type from the list of descriptors and configure it.
+
+    <st:attribute name="field" use="required">
+      Field name in the parent object where databinding happens.
+    </st:attribute>
+    <st:attribute name="descriptors" use="required">
+      all types that the user can add.
+    </st:attribute>
+  </st:documentation>
+
+  <f:prepareDatabinding />
+
+  <table style="width:100%">
+    <j:set var="currentInstance" value="${instance[field]}" />
+    <j:set var="currentDescriptor" value="${currentInstance.descriptor}" />
+    <j:forEach var="d" items="${descriptors}" varStatus="loop">
+      <f:radioBlock name="${field}" help="${d.helpFile}" value="${loop.index}"
+        title="${d.displayName}" checked="${currentDescriptor==d}">
+        <j:set var="descriptor" value="${d}" />
+        <j:set var="instance" value="${currentDescriptor==d?currentInstance:null}" />
+        <st:include from="${d}" page="${d.configPage}" optional="true" />
+
+        <f:block><!-- this tells Stapler which block is for which class -->
+          <input type="hidden" name="stapler-class" value="${d.clazz.name}" />
+        </f:block>
+      </f:radioBlock>
+    </j:forEach>
+  </table>
+</j:jelly>