X-Git-Url: http://xvm.mit.edu/gitweb/invirt/packages/invirt-web.git/blobdiff_plain/b26a7d35e4ac578595f88eef03303cfbfd42a319..e37dd15bbf8683bab8454ea0eec8e9968ce982b2:/code/templates/functions.tmpl

diff --git a/code/templates/functions.tmpl b/code/templates/functions.tmpl
new file mode 100644
index 0000000..213b639
--- /dev/null
+++ b/code/templates/functions.tmpl
@@ -0,0 +1,32 @@
+#def cdromList($cdroms, $default="")
+<select name="cdrom">
+  <option #slurp
+#if $default then '' else 'selected'
+ value="">None</option>
+  #for $cdrom in $cdroms
+  <option #slurp
+#if $default == $cdrom.cdrom_id then 'selected' else ''
+ value="$cdrom.cdrom_id">
+    $cdrom.description
+  </option>
+  #end for
+</select>
+#end def
+
+#def addError(txt)
+#if $varExists('txt')
+#set global $error_text = $error_text + '----\n' + $txt
+#else
+#set global $error_text = $txt
+#end if
+#end def
+
+#def errorRow($value, $err)
+#if $err and $err.err_field == $value
+<tr>
+<td class="error" colspan="2">${str($err)}</td>
+</tr>
+#end if
+#end def
+
+$full_body
\ No newline at end of file