Private Sub Application_Start (Nav As NavigationController)
NavControl = Nav
LocManager.Initialize("LocManager")
'disable location pauses
Dim no As NativeObject = LocManager
no = no.GetField("manager")
no.SetField("pausesLocationUpdatesAutomatically", False)
StartBackground(LocManager, 0) 'replaces locManager.Start