X-Git-Url: https://git.zerfleddert.de/cgi-bin/gitweb.cgi/rsbs2/blobdiff_plain/a154a83fe4695eca4bb8aeebe7fb5380561a94df..2fd81eb058a54dbeb196c9cea47c1f2e15f6cd51:/supermicro-kvm.pl

diff --git a/supermicro-kvm.pl b/supermicro-kvm.pl
index afe0523..334bb2b 100755
--- a/supermicro-kvm.pl
+++ b/supermicro-kvm.pl
@@ -48,11 +48,9 @@ sub read_inifile {
 
 my %Config = read_inifile("$ENV{HOME}/.rsbs2rc");
 
-my $hostalias;
+my $hostalias = $ARGV[0];
 
-if (defined($ARGV[0])) {
-	$hostalias = $ARGV[0];
-} else {
+if (!defined($hostalias) || !defined($Config{$hostalias})) {
 	print STDERR "Usage: $0 card-alias\n\n";
 	print STDERR "card-alias\tone of: ";
 	foreach my $alias (keys(%Config)) {
@@ -77,5 +75,6 @@ $fh->unlink_on_destroy(1);
 
 print $fh $jnlp;
 
+$ENV{'AWT_TOOLKIT'} = 'MToolkit';
 system("javaws", $fh->filename);
 sleep(1);