Parcourir la source

- removed commented out code

git-svn-id: branches/unicodekvm@41513 -
nickysn il y a 6 ans
Parent
commit
9a82b32cde
1 fichiers modifiés avec 0 ajouts et 1 suppressions
  1. 0 1
      packages/rtl-console/src/unix/keyboard.pp

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

@@ -1667,7 +1667,6 @@ begin {main}
     again:=false;
     if Mychar=#0 then
       begin
-{        MyScan:=ord(ReadKey);}
         MyScan:=MyKey.VirtualScanCode shr 8;
         { Handle Ctrl-<x>, but not AltGr-<x> }
         if (essCtrl in SState) and (not (essAlt in SState))  then