keep help page at a readable width
[invirt/packages/invirt-web.git] / code / templates / functions.tmpl
1 #def databaseList($lst, $default, $onchange, $name, $id, $valueattr, $descattr)
2 <select name="$name" id="$id"#slurp
3 #if $onchange is not None
4 onchange="$onchange"#slurp
5 #end if
6 >
7   <option #slurp
8 #if $default then '' else 'selected'
9  value="">None</option>
10   #for $item in $lst
11   <option #slurp
12 #if $default == getattr(item, valueattr) then 'selected' else ''
13  value="${getattr(item, valueattr)}">
14     ${getattr(item, descattr)}
15   </option>
16   #end for
17 </select>
18 #end def
19
20 #def cdromList($default="", $onchange=None)
21 $databaseList(sorted($sipb_xen_database.CDROM.select(), key=lambda x: x.description),
22               default, onchange, 'cdrom', 'cdromlist', 'cdrom_id', 'description')
23 #end def
24
25 #def autoList($default="", $onchange=None)
26 $databaseList(sorted($sipb_xen_database.Autoinstall.select(), key=lambda x: x.description),
27               default, onchange, 'autoinstall', 'autoinstalllist', 'autoinstall_id', 'description')
28 ## $databaseList(autos, default, onchange, 'autoinstall', 'autoinstalllist', 'autoinstall_id', 'description')
29 #end def
30
31 #def vmTypeList($default=None)
32 #for $vmtype in sorted($sipb_xen_database.Type.select(), key=lambda x: x.description)
33 <label>
34    <input #slurp
35 #if $default == $vmtype then 'checked' else ''
36  type="radio" name="vmtype" value="${vmtype.type_id}">${vmtype.description}</input>
37 </label>
38 #end for
39 #end def
40
41 #def addError(txt)
42 #if $varExists('txt')
43 #set global $error_text = $error_text + '----\n' + $txt
44 #else
45 #set global $error_text = $txt
46 #end if
47 #end def
48
49 #def errorRow($value, $err)
50 #if $err and $err.err_field == $value
51 <tr>
52 <td class="error" colspan="2">${str($err)}</td>
53 </tr>
54 #end if
55 #end def
56
57 $full_body