better sectioning in list page

[invirt/packages/invirt-web.git] / code / templates / list.tmpl

diff --git a/code/templates/list.tmpl b/code/templates/list.tmpl
index 6e06c53..dc4ad47 100644 (file)
--- a/code/templates/list.tmpl
+++ b/code/templates/list.tmpl
@@ -3,14 +3,14 @@
 
 
 #def title
-List of your VMs
+VM List
 #end def
 
-#def createTable()
+#def createForm()
 #if $cant_add_vm
 <p>$cant_add_vm</p>
 #else
-<p>Create a new VM:</p>
+<h2>Create a new VM</h2>
 #if $err
 <p class="error">We had a problem with your request:</p>
 #else if $varExists('new_machine')
@@ -52,6 +52,13 @@ $errorRow('vmtype', $err)
        </tr>
 $errorRow('cdrom', $err)
        <tr>
+         <td>Clone image?</td>
+         <td><input type="checkbox" name="clone_from" id="clone_from" value="ice3" onchange="onclone(event)"/>
+             (experimental; 1-2 minutes, and you have an etch machine; root pw is 'password'.)
+             <script type='text/javascript'>function onclone(e){ document.getElementById('cdromlist').value = ''; }</script></td>
+       </tr>
+$errorRow('cdrom', $err)
+       <tr>
          <td>Owner</td>
          <td><input type="text" name="owner" value="$defaults.owner"/></td>
        </tr>
@@ -77,14 +84,12 @@ $errorRow('cdrom', $err)
 <td>#slurp
 #if $machine.uptime
 $machine.uptime#slurp
-#else
-Off#slurp
 #end if
 </td>
        <td>#slurp
 #if $has_vnc[$machine] == True
 <a href="vnc?machine_id=$machine.machine_id">Console</a>#slurp
-#else
+#else if $has_vnc[$machine] != 'Off'
 $has_vnc[$machine]
 #end if
 </td>
@@ -104,14 +109,15 @@ $has_vnc[$machine]
 #def machineList($machines)
     <table>
       <tr>
-       <td>Name</td>
-       <td>Memory</td>
-       <td>Owner</td>
-        <td>Administrator</td>
-       <td>IP</td>
-       <td>Uptime</td>
-       <td>VNC</td>
-       <td></td>
+       <th>Name</th>
+       <th>Memory</th>
+       <th>Owner</th>
+        <th>Administrator</th>
+       <th>IP</th>
+       <th>Uptime</th>
+       <th>VNC</th>
+       <th></th>
+      </tr>
       #for $machine in $machines:
        $machineRow($machine)
       #end for
@@ -120,17 +126,13 @@ $has_vnc[$machine]
 
 
 #def body
-<p style="font-size: 125%;"><strong>Note:</strong> sipb-xen is a very alpha service. <a href="/static/about.html">What does this mean?</a></p>
+<p style="font-size: 125%;">SIPB Virtual Servers is an <strong>alpha service</strong>.  <a href="/static/about.html">What does this mean?</a></p>
 #if not $machines
 <p>You don't currently control any VMs.</p>   
-#else
-    <p>You have the following VMs:</p>
 #end if
     <p><a href="list">refresh</a></p>
     <div id="machinelist">
     $machineList($machines)
     </div>
-<div id="createtable">
-$createTable()
-</div>
+$createForm()
 #end def