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);