Quellcode durchsuchen

* fixed off-by-one error when putting a character back into the input buffer

git-svn-id: branches/unicodekvm@41490 -
nickysn vor 6 Jahren
Ursprung
Commit
d3310cc731
1 geänderte Dateien mit 1 neuen und 1 gelöschten Zeilen
  1. 1 1
      packages/rtl-console/src/unix/keyboard.pp

+ 1 - 1
packages/rtl-console/src/unix/keyboard.pp

@@ -1470,7 +1470,7 @@ begin
               if not(ch in ['a'..'z','A'..'N','P'..'Z','0'..'9','-','+','_','=']) then
                 begin
                   if intail=0 then
-                    intail:=insize
+                    intail:=insize-1
                   else
                     dec(intail);
                   inbuf[intail]:=ch;