Start with debugging. LOG ALL apps returning.
There may be more that just ONE which contains the string camera.
For Each st As String In Pm.GetInstalledPackages
If st.Contains("camera") =True Then
Log(st)
End If
Next
End Sub
What does the log output?