X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=KernelLand%2FKernel%2Fdrv%2Fvterm_vt100.c;h=1f34479449bb18dfa5b2096ded57778efae28319;hb=9edb6f7c288a93d9f9ce3f7233b577a601471071;hp=51666331efb1344e64b1413c64c5babee6055e57;hpb=a260c1b26118b7a16015d50c74e6edcbcb09784f;p=tpg%2Facess2.git

diff --git a/KernelLand/Kernel/drv/vterm_vt100.c b/KernelLand/Kernel/drv/vterm_vt100.c
index 51666331..1f344794 100644
--- a/KernelLand/Kernel/drv/vterm_vt100.c
+++ b/KernelLand/Kernel/drv/vterm_vt100.c
@@ -158,7 +158,23 @@ void VT_int_ParseEscape_StandardLarge(tVTerm *Term, char CmdChar, int argc, int
 			Term->ViewPos += Term->TextWidth*tmp;
 		}
 		break;
-	
+	// Set Mode (?)
+	case 'h':
+		if( argc >= 1 )
+		{
+			switch(args[0])
+			{
+			case 2:	// Keyboard action mode
+			case 4:	// Insert mode
+			case 12:	// Send/receive
+			case 20:	// Automatic newline
+				break;
+			default:	// ?
+				break;
+			}
+		}
+		break;
+		
 	// Set Font flags
 	case 'm':
 		for( ; argc--; )