X-Git-Url: http://xvm.mit.edu/gitweb/invirt/packages/invirt-web.git/blobdiff_plain/564b08ea0b7b6414d8eccef0fd00ba8ccdb591da..74cf12ca4c1ba056483885a9b3b0d5c86014f1d1:/code/templates/list.tmpl
diff --git a/code/templates/list.tmpl b/code/templates/list.tmpl
index ae0d564..5c0bc74 100644
--- a/code/templates/list.tmpl
+++ b/code/templates/list.tmpl
@@ -6,11 +6,11 @@
VM List
#end def
-#def createTable()
+#def createForm()
#if $cant_add_vm
$cant_add_vm
#else
-Create a new VM:
+Create a new VM
#if $err
We had a problem with your request:
#else if $varExists('new_machine')
@@ -35,16 +35,10 @@ $errorRow('memory', $err)
GiB (${"%0.1f" % ($max_disk-0.05)} max) |
$errorRow('disk', $err)
-
- HVM/ParaVM$helppopup('hvm_paravm') |
-
-#for $value, $name in (('hvm', 'HVM'), ('paravm', 'ParaVM'))
- $name
-#end for
- |
-
+
+ HVM/ParaVM$helppopup('hvm_paravm') |
+ $vmTypeList($defaults.type) |
+
$errorRow('vmtype', $err)
Boot CD |
@@ -84,14 +78,12 @@ $errorRow('cdrom', $err)
#slurp
#if $machine.uptime
$machine.uptime#slurp
-#else
-Off#slurp
#end if
|
#slurp
#if $has_vnc[$machine] == True
Console#slurp
-#else
+#else if $has_vnc[$machine] != 'Off'
$has_vnc[$machine]
#end if
|
@@ -111,14 +103,15 @@ $has_vnc[$machine]
#def machineList($machines)
- Name |
- Memory |
- Owner |
- Administrator |
- IP |
- Uptime |
- VNC |
- |
+ Name |
+ Memory |
+ Owner$helppopup('owner') |
+ Administrator$helppopup('administrator') |
+ IP |
+ Uptime |
+ VNC |
+ |
+
#for $machine in $machines:
$machineRow($machine)
#end for
@@ -130,14 +123,10 @@ $has_vnc[$machine]
SIPB Virtual Servers is an alpha service. What does this mean?
#if not $machines
You don't currently control any VMs.
-#else
- You have the following VMs:
#end if
refresh
$machineList($machines)
-
-$createTable()
-
+$createForm()
#end def