Merge pull request #1854 from livecode/merge-develop-8.1-13.12.2017

Merge develop 8.1 13.12.2017

Author: livecodepanos

Toolset/libraries/revidelibrary.8.livecodescript

@@ -9168,6 +9168,15 @@ on revIDEActionPasteTextIntoField pField
    unlock screen
 end revIDEActionPasteTextIntoField
 
+on revIDEToggleLockTextOfField pField
+   # Make sure we have an field
+   if word 1 of pField is not "field" then
+      exit revIDEToggleLockTextOfField
+   end if
+   
+   set the lockText of pField to not (the lockText of pField)
+end revIDEToggleLockTextOfField
+
 on revIDEToggleTraversalOnOfField pField
    # Make sure we have an field
    if word 1 of pField is not "field" then

Toolset/palettes/menubar/revmenubar.livecodescript

@@ -2594,6 +2594,9 @@ on revMenubarContextMenuPickTarget pWhich, pTarget
       case "Paste Text"
          revIDEActionPasteTextIntoField pTarget
          break
+      case "Lock Text"
+         revIDEToggleLockTextOfField pTarget
+         break
       case "Can Receive Keyboard Focus"
          revIDEToggleTraversalOnOfField pTarget
          break

Toolset/palettes/standalone settings/revstandalonesettings.8.rev

@@ -144,6 +144,7 @@ on updateSettings
    put computeDefault(tSettings["ios,retina icon"], empty) into field "Retina Icon"
    put computeDefault(tSettings["ios,iOS 7 retina icon"], empty) into field "iOS 7 Retina Icon"
    put computeDefault(tSettings["ios,iPhone 6 Plus icon"], empty) into field "iPhone 6 Plus Icon" 
+   put computeDefault(tSettings["ios,iPhone X icon"], empty) into field "iPhone X Icon" 
    put computeDefault(tSettings["ios,ipad icon"], empty) into field "iPad Icon"
    put computeDefault(tSettings["ios,ipad retina icon"], empty) into field "iPad Retina Icon"
    put computeDefault(tSettings["ios,iOS 7 ipad icon"], empty) into field "iOS 7 iPad Icon"
@@ -155,6 +156,8 @@ on updateSettings
    put computeDefault(tSettings["ios,iPhone 6 splash"], empty) into field "iPhone 6 Splash"   
    put computeDefault(tSettings["ios,iPhone 6 Plus Portrait splash"], empty) into field "iPhone 6 Plus Portrait Splash"   
    put computeDefault(tSettings["ios,iPhone 6 Plus Landscape splash"], empty) into field "iPhone 6 Plus Landscape Splash"
+   put computeDefault(tSettings["ios,iPhone X Portrait splash"], empty) into field "iPhone X Portrait Splash"   
+   put computeDefault(tSettings["ios,iPhone X Landscape splash"], empty) into field "iPhone X Landscape Splash"
    put computeDefault(tSettings["ios,ipad portrait splash"], empty) into field "iPad Portrait Splash"
    put computeDefault(tSettings["ios,ipad landscape splash"], empty) into field "iPad Landscape Splash"
    put computeDefault(tSettings["ios,ipad retina portrait splash"], empty) into field "iPad Retina Portrait Splash"
@@ -322,6 +325,8 @@ command updateOrientationSettings
    if the enabled of button "iPhone Intial Orientation" then
       set the enabled of group "iPhone 6 Plus Portrait Splash" to tInitialOrientation contains "portrait"
       set the enabled of group "iPhone 6 Plus Landscape Splash" to tInitialOrientation contains "landscape"
+      set the enabled of group "iPhone X Portrait Splash" to tInitialOrientation contains "portrait"
+      set the enabled of group "iPhone X Landscape Splash" to tInitialOrientation contains "landscape"
    end if
 end updateOrientationSettings
 
@@ -335,6 +340,7 @@ command enableDeviceSpecificSettings pDevices
    set the enabled of group "Retina Icon" to (1 is among the items of pDevices)
    set the enabled of group "iOS 7 Retina Icon" to (1 is among the items of pDevices)
    set the enabled of group "iPhone 6 Plus Icon" to (1 is among the items of pDevices)
+   set the enabled of group "iPhone X Icon" to (1 is among the items of pDevices)
    set the enabled of group "iPad Icon" to (2 is among the items of pDevices)
    set the enabled of group "iPad Retina Icon" to (2 is among the items of pDevices)
    set the enabled of group "iOS 7 iPad Icon" to (2 is among the items of pDevices)
@@ -346,6 +352,8 @@ command enableDeviceSpecificSettings pDevices
    set the enabled of group "iPhone 6 Splash" to (1 is among the items of pDevices)
    set the enabled of group "iPhone 6 Plus Portrait Splash" to (1 is among the items of pDevices)
    set the enabled of group "iPhone 6 Plus Landscape Splash" to (1 is among the items of pDevices)
+   set the enabled of group "iPhone X Portrait Splash" to (1 is among the items of pDevices)
+   set the enabled of group "iPhone X Landscape Splash" to (1 is among the items of pDevices)
    set the enabled of group "iPad Portrait Splash" to (2 is among the items of pDevices)
    set the enabled of group "iPad Landscape Splash" to (2 is among the items of pDevices)
    set the enabled of group "iPad Retina Portrait Splash" to (2 is among the items of pDevices)
@@ -434,11 +442,11 @@ on tipDisplayUpdate
    if the visible of group "iOSCommercialTip" then
       set the topLeft of group "iosBuild" to 12,136
       set the topLeft of group "iOS Settings" to -1,136
-      set the cSize of this card to 1024,726
+      set the cSize of this card to 1024,796
    else 
       set the topLeft of group "iOS Settings" to -1,67
       set the topLeft of group "iosBuild" to 12,68
-      set the cSize of this card to 1024,676
+      set the cSize of this card to 1024,746
    end if
    updateCardSize
 end tipDisplayUpdate

Toolset/palettes/standalone settings/revstandalonesettingsiosbehavior.livecodescript

@@ -0,0 +1 @@
+# Enable lock/unlock text from popUp for fields