--- vt102/vt102	2014/12/05 05:41:49	1.28
+++ vt102/vt102	2014/12/05 06:32:28	1.29
@@ -616,10 +616,10 @@
    "\e[8\$" => 0x23 | 0x080, # SHIFT BREAK / DISCONNECT (shift-end)
    "\x7f"   => 0x33, # BACKSPACE
   
-   "\e[11~" => 0x32, # F1
-   "\e[11~" => 0x42, # F2
-   "\e[11~" => 0x31, # F3
-   "\e[11~" => 0x41, # F4
+   "\e[11~" => 0x32, # PF1
+   "\e[12~" => 0x42, # PF2
+   "\e[13~" => 0x31, # PF3
+   "\e[14~" => 0x41, # PF4
 );
 
 @KEYMAP{map chr, 0x20 .. 0x40, 0x5b .. 0x7e} = unpack "C*", pack "H*",
@@ -658,7 +658,7 @@
 }
 
 if ($KBD) {
-   system "stty -icanon -icrnl -inlcr -echo min 1 time 0";
+   system "stty -icanon -icrnl -inlcr -echo min 1 time 0"; # -isig
    eval q{ sub END { system "stty sane" } };
    $SIG{INT} = $SIG{TERM} = $SIG{QUIT} = sub { exit 1 };
 }