* another cleanup of unnecessary variables

git-svn-id: trunk@3782 -

rtl/os2/keyboard.pp

@@ -102,7 +102,6 @@ function SysGetShiftState: Byte;
 
 var
  K: TKbdInfo;
- L: cardinal;
 begin
  KbdGetFocus (IO_NoWait, Handle);
  K.cb := SizeOf (K);