mirrors/lqml
1
Fork 0
mirror of https://gitlab.com/eql/lqml.git synced 2026-01-22 04:20:56 -08:00
Code Issues Projects Releases Packages Wiki Activity

revision

Browse source
This commit is contained in:
pls.153 2022-02-23 08:01:25 +01:00
parent 3db2f5d151
commit 4d48d351cc
3 changed files with 9 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/cpp/ecl_ext.cpp
View file

@ -553,16 +553,16 @@ cl_object reload2() {
}
cl_object ensure_permissions2(cl_object l_permissions) {
/// args: (permission/permissions)
/// Android only; requests the passed permission, or a list of them.
/// Returns the permission if it was granted, or a list of the granted
/// args: (&rest permissions)
/// Android only; requests the passed permissions. If granted, it returns
/// either the string (only one permission passed) or a list of granted
/// permissions.
/// (ensure-permissions "android.permission.ACCESS_FINE_LOCATION")
cl_object l_ret = ECL_T;
#if (defined Q_OS_ANDROID) && (QT_VERSION > 0x050A00) // 5.10
QStringList permissions(toQStringList(l_permissions));
QStringList denied;
QStringList granted;
QStringList denied;
Q_FOREACH (QString p, permissions) {
if (QtAndroid::checkPermission(p) == QtAndroid::PermissionResult::Granted) {
granted << p;