changeset 5168 | 8a074a255af0 |
parent 5167 | 7b515d0945b1 |
child 5174 | f5294509783e |
--- a/hedgewars/uMobile.pas Thu Apr 21 07:41:24 2011 +0200 +++ b/hedgewars/uMobile.pas Thu Apr 21 08:22:34 2011 +0200 @@ -46,8 +46,6 @@ implementation uses uVariables; -const kSystemSoundID_Vibrate = $00000FFF; - function isPhone: Boolean; inline; begin {$IFDEF IPHONEOS} @@ -57,6 +55,7 @@ end; procedure performRumble; inline; +const kSystemSoundID_Vibrate = $00000FFF; begin {$IFDEF IPHONEOS} AudioServicesPlaySystemSound(kSystemSoundID_Vibrate);