[Ttssh2-commit] [3498] Ctrl-Uでラインバッファの内容をクリアするようにした。

Back to archive index

svnno****@sourc***** svnno****@sourc*****
2009年 6月 16日 (火) 13:32:56 JST


Revision: 3498
          http://sourceforge.jp/projects/ttssh2/svn/view?view=rev&revision=3498
Author:   doda
Date:     2009-06-16 13:32:56 +0900 (Tue, 16 Jun 2009)

Log Message:
-----------
Ctrl-Uでラインバッファの内容をクリアするようにした。

Modified Paths:
--------------
    trunk/teraterm/ttpcmn/ttcmn.c


-------------- next part --------------
Modified: trunk/teraterm/ttpcmn/ttcmn.c
===================================================================
--- trunk/teraterm/ttpcmn/ttcmn.c	2009-06-16 02:11:19 UTC (rev 3497)
+++ trunk/teraterm/ttpcmn/ttcmn.c	2009-06-16 04:32:56 UTC (rev 3498)
@@ -1277,6 +1277,14 @@
 					TempStr[TempLen++] = d;
 				}
 			}
+			else if (d==0x15) { // Ctrl-U
+				if (cv->TelLineMode) {
+					cv->LineModeBuffCount = cv->FlushLen;
+				}
+		  		else {
+					TempStr[TempLen++] = d;
+				}
+			}
 			else if ((d>=0x80) && (cv->KanjiCodeSend==IdUTF8 || cv->Language==IdUtf8)) {
 				TempLen += OutputTextUTF8((WORD)d, TempStr, cv);
 			}
@@ -1403,6 +1411,14 @@
 			}
 			break;
 
+		  case 0x15: // Ctrl-U
+			if (cv->TelLineMode) {
+				cv->LineModeBuffCount = cv->FlushLen;
+			}
+			else {
+				TempStr[TempLen++] = d;
+			}
+
 		  default:
 			if ((cv->Language==IdRussian) && (d>=128)) {
 				d = RussConv(cv->RussClient, cv->RussHost, d);



Ttssh2-commit メーリングリストの案内
Back to archive index