--- vt102/vt102	2014/12/03 02:10:35	1.12
+++ vt102/vt102	2014/12/03 02:13:26	1.13
@@ -25,21 +25,10 @@
 my $AVO   = 1;
 my $KBD   = 1;
 
-if ($ARGV[0] =~ /^-?-vt100$/) {
-   shift; $VT102 = 0; $AVO = 0;
-}
-
-if ($ARGV[0] =~ /^-?-vt100\+avo$/) {
-   shift; $VT102 = 0; $AVO = 1;
-}
-
-if ($ARGV[0] =~ /^-?-vt102$/) {
-   shift; # default
-}
-
-if ($ARGV[0] =~ /^-?-vt131$/) {
-   shift; $VT131 = 1;
-}
+shift, ($VT102 = 0), ($AVO = 0) if $ARGV[0] =~ /^-?-vt100$/;
+shift, ($VT102 = 0)             if $ARGV[0] =~ /^-?-vt100\+avo$/;
+shift                           if $ARGV[0] =~ /^-?-vt102$/;
+shift, ($VT131 = 1)             if $ARGV[0] =~ /^-?-vt131$/;
 
 if ($ARGV[0] =~ /^-/) {
    die <<EOF;