Merge pull request #1908 from livecode/bugfix-20794

[Bug 20794] Show warning when using map widget on OSX 10.9 and 10.10

Author: livecodepanos

Toolset/libraries/revidelibrary.8.livecodescript

@@ -3451,10 +3451,10 @@ on revIDECreateObject pObjectTypeID, pTarget, pLoc
    if not __objectTypeIsControl(pObjectTypeID) then
       return __revIDEError("Object must be a control")
    end if
-
+   
    if not exists(pTarget) then return __revIDEError("Cannot create object. Target does not exist: " && pTarget)
    if not pObjectTypeID begins with "com.livecode" then return __revIDEError("No such object type ID: " && pTarget)
-
+   
    if sClassicObjectProperties is empty then __objectPropertiesRead
    # Set the default stack to the target we're creating the object on
    set the defaultstack to revIDEStackOfObject(pTarget)
@@ -3478,10 +3478,10 @@ on revIDECreateObject pObjectTypeID, pTarget, pLoc
          put round(the cTabButtonWidth of stack "revPreferences" / 2), round(the cTabButtonHeight of stack "revPreferences" / 2) into tCreateRect
          put item 1 of tCreateRect + the cTabButtonWidth of stack "revPreferences" into item 3 of tCreateRect
          put item 2 of tCreateRect + the cTabButtonHeight of stack "revPreferences" into item 4 of tCreateRect
-
+         
          local lDataGrid
          put true into lDataGrid -- select data grid at end not single control
-
+         
          unlock messages
          # tObjectId is passed by reference and will have the data grid group id placed into it
          addDataGridToStack the short name of this stack, tCreateRect, empty, empty, tCreatedControlID
@@ -3509,6 +3509,17 @@ on revIDECreateObject pObjectTypeID, pTarget, pLoc
    else
       # Not a classic control
       try
+         if pObjectTypeID is "com.livecode.widget.native.map" and the platform is "MacOS" and (revIDEPlatformVersion() begins with "10.9" or revIDEPlatformVersion() begins with "10.10") then
+            local tMessage
+            put "The Mac MapKit API is supported from OS X 10.9 onwards, but Apple restricts use of the API on 10.9 and 10.10 to apps which are distributed from the Mac AppStore with an appropriate entitlement. " & \
+                  "Due to this, general use of the Map widget only supports OS X 10.11 onwards. " & CR & CR & \  
+                  "However, you can still create a standalone with the Map widget on OSX 10.9 or 10.10 (of course you will see an empty grid rather than the actual map), " & \
+                  " BUT this standalone will run as expected on OSX 10.11 and above." into tMessage
+            
+            answer warning revIDELocalise(tMessage) with "Cancel" and "Continue"
+            if it is "Cancel" then exit revIDECreateObject
+         end if
+         
          create widget as pObjectTypeID
          put the long id of the last control into tCreatedControlID
 
@@ -3532,17 +3543,17 @@ on revIDECreateObject pObjectTypeID, pTarget, pLoc
    __setSizeToPreference tCreatedControlID, pObjectTypeID
 
    set the loc of tCreatedControlID to pLoc
-
+   
    unlock messages
    unlock screen
-
+   
    ## Prevent passing of ideNewControl message for objects created on IDE stacks
    if revIDEObjectIsOnIDEStack(tCreatedControlID) is false then
       // AL-2015-04-08: [[ Bug 14822 ]] Ensure 'edited' status of stack is set
       revIDESetEdited the short name of this stack
       ideMessageSend "ideNewControl", tCreatedControlID
    end if
-
+   
    return tCreatedControlID
 end revIDECreateObject
 

notes/bugfix-20794.md

@@ -0,0 +1 @@
+# Show warning when creating a Map widget on OSX 10.9 and 10.10