Browse Source

- Removed unused variables

git-svn-id: trunk@25005 -
sergei 12 years ago
parent
commit
40045e6269
2 changed files with 1 additions and 4 deletions
  1. 0 3
      rtl/unix/keyboard.pp
  2. 1 1
      rtl/unix/mouse.pp

+ 0 - 3
rtl/unix/keyboard.pp

@@ -302,7 +302,6 @@ end;
 
 procedure UnpatchKeyboard;
 var
-  e : ^chgentry;
   entry : kbentry;
   i : longint;
 begin
@@ -339,8 +338,6 @@ end;
  when working on another console. So we unpatch it when the user switches
  away.}
 
-const switches:longint=0;
-
 procedure vt_handler(sig:longint);cdecl;
 
 begin

+ 1 - 1
rtl/unix/mouse.pp

@@ -148,7 +148,7 @@ const mouse_terminals:array[0..6] of string[7]=('cons','eterm','gnome',
       xterm=6;
       mouse_1003_capable=[xterm]; {xterm only for now}
 
-var term,colorterm:string;
+var term:string;
     i,t:shortint;
 
 begin