--- a/hedgewars/uConsts.pas Mon Dec 03 17:49:02 2012 +0100
+++ b/hedgewars/uConsts.pas Mon Dec 03 17:51:57 2012 +0100
@@ -275,6 +275,8 @@
NoPointX = Low(LongInt);
cTargetPointRef : TPoint = (X: NoPointX; Y: 0);
+ kSystemSoundID_Vibrate = $00000FFF;
+
implementation
end.