hedgewars/uInputHandler.pas
changeset 14845 6c51f74d80a8
parent 14832 769189675b6c
child 14894 5a6da39c5f2a
--- a/hedgewars/uInputHandler.pas	Sat Apr 27 13:51:02 2019 +0200
+++ b/hedgewars/uInputHandler.pas	Sat Apr 27 15:13:33 2019 +0200
@@ -289,6 +289,10 @@
             ProcessKey(KeyNameToCode('mousem'), ButtonDown);
         SDL_BUTTON_RIGHT:
             ProcessKey(KeyNameToCode('mouser'), ButtonDown);
+        SDL_BUTTON_X1:
+            ProcessKey(KeyNameToCode('mousex1'), ButtonDown);
+        SDL_BUTTON_X2:
+            ProcessKey(KeyNameToCode('mousex2'), ButtonDown);
         end;
 end;
 
@@ -452,9 +456,11 @@
     KeyNames[cKeyMaxIndex    ]:= 'mousel';
     KeyNames[cKeyMaxIndex - 1]:= 'mousem';
     KeyNames[cKeyMaxIndex - 2]:= 'mouser';
-    mwheelupCode:= cKeyMaxIndex - 3;
+    KeyNames[cKeyMaxIndex - 3]:= 'mousex1';
+    KeyNames[cKeyMaxIndex - 4]:= 'mousex2';
+    mwheelupCode:= cKeyMaxIndex - 5;
     KeyNames[mwheelupCode]:= 'wheelup';
-    mwheeldownCode:= cKeyMaxIndex - 4;
+    mwheeldownCode:= cKeyMaxIndex - 6;
     KeyNames[mwheeldownCode]:= 'wheeldown';
 
     // Keyboard keys