--- lib/PXElator/html.pm	2009/09/07 15:43:55	389
+++ lib/PXElator/html.pm	2009/09/08 20:45:24	404
@@ -51,7 +51,6 @@
 		, qq|<select type=select name=$name>|
 		, join("\n", map { my $selected = $_ eq $selected_option ? 'selected' : ''; qq|<option name=$_ $selected>$_</option>| } @_ )
 		, qq|</select>|
-		, qq|</form>|
 	);
 }
 
@@ -99,6 +98,8 @@
 			} elsif ( $name eq 'ssh' ) {
 				$html =~ s{\s(\S{16}).+(\S{16})\s}{ $1..$2 };
 				chomp($html);
+			} elsif ( $name eq 'kvm' ) {
+				$html = qq|<a href="/start_stop/kvm?nr=$html">$html</a>|;
 			}
 			$html = qq|<tt>$html</tt>|
 			unless