Merge pull request #2062 from livecode/merge-develop-9.0-13.05.2019

Merge develop 9.0 13.05.2019

Author: livecodepanos

Documentation/guides/Extending LiveCode.md

@@ -1071,7 +1071,7 @@ method to allocate an instance, and then call `initWithVoice:` on it:
 The `+` indicates this is a class method, i.e. we don't require an 
 instance of the class to call the method. 
 
-	foreign handler Objc_NSSpeechSynthesizerInitWithVoice(in pSynthesizer as ObjcId, in pVoice as optional ObjcId) returns ObjcId \
+	foreign handler Objc_NSSpeechSynthesizerInitWithVoice(in pSynthesizer as ObjcRetainedId, in pVoice as optional ObjcId) returns optional ObjcRetainedId \
 		binds to "objc:NSSpeechSynthesizer.-initWithVoice:"
 		
 The `-` here indicates this is an instance method, i.e. we require an 

Toolset/libraries/revfrontscriptlibrary.livecodescript

@@ -393,9 +393,14 @@ on closeStack
             put revTargetStack() into tStackName
 
             local tFileName
+            
+            local tIsBuildingStandalone
+            put (there is a stack "revStandaloneProgress" and \
+                  the mode of stack "revStandaloneProgress" > 0) into tIsBuildingStandalone
+            
             # OK-2008-08-05 : Bug 6562 - Bug where the user was being prompted to delete the home stack on startup,
             # caused by revIDEStack returning true/false instead of empty/non-empty.
-            if tAllClosed and not revIDEStackNameIsIDEStack(tStackName) then
+            if not tIsBuildingStandalone and tAllClosed and not revIDEStackNameIsIDEStack(tStackName) then
                put the effective fileName of gREVTargetStack into tFileName
 
                # TH - 7689 improved wording of warning message

Toolset/palettes/behaviors/revinspectorbehavior.livecodescript

@@ -4,6 +4,9 @@ constant kMaxLabelSize = 200
 # The inspector data
 local sDataA
 
+# used by manualHeight
+local sStackIsInFront
+
 on setAsBehavior pTarget
    dispatch "setAsBehavior" to revIDEFrameBehavior() with the long id of this me
    set the behavior of pTarget to the long id of this me
@@ -36,6 +39,7 @@ before openStack
    end repeat
    set the stackfiles of me to tStackFiles
    revIDEPopDefaultFolder
+   put true into sStackIsInFront
 end openStack
 
 on resizeInspector
@@ -180,7 +184,8 @@ local sManualHeightOfStack, sNewHeight, sOldHeight
 on inspectorLayoutGroups pGroupList, pForceHeight
 
    # store height of stack when manually resizing
-   if pForceHeight is not true and the mouse is "down" and sNewHeight is not sOldHeight then
+   if pForceHeight is not true and the mouse is "down"  \
+         and sNewHeight is not sOldHeight and the mouseStack is empty and sStackIsInFront then
       put the height of this stack into sManualHeightOfStack
    end if
 
@@ -277,7 +282,11 @@ on inspectorLayoutGroups pGroupList, pForceHeight
 
    local tStackHeight
    if tInspectorHeight is empty then
-      put kInspectorMinHeight into tStackHeight
+      if sManualHeightOfStack is not empty then
+         put sManualHeightOfStack into tStackHeight
+      else
+         put kInspectorMinHeight into tStackHeight
+      end if
    else
       put tInspectorHeight + tMargin into tStackHeight
    end if
@@ -288,11 +297,6 @@ on inspectorLayoutGroups pGroupList, pForceHeight
       set the maxheight of me to tStackHeight
    end if
 
-   # reset manualHeight if user expands a non-expandable tab to full height
-   if not pForceHeight and not tCanExpand and sManualHeightOfStack is tStackHeight then
-      put empty into sManualHeightOfStack
-   end if
-   
    -- Make stack smaller rather than go offscreen
    local tScreenRect, tNewStackHeight
    put revIDEStackScreenRect(the long id of me, true) into tScreenRect
@@ -343,6 +347,16 @@ before resizeStack pNewWidth, pNewHeight, pOldWidth, pOldHeight
    pass resizeStack
 end resizeStack
 
+on resumeStack
+   put true into sStackIsInFront
+   pass resumeStack
+end resumeStack
+
+on suspendStack
+   put false into sStackIsInFront
+   pass suspendStack
+end suspendStack
+
 function getManualHeight
    return sManualHeightOfStack
 end getManualHeight

Toolset/palettes/inspector/editors/com.livecode.pi.customprops.behavior.livecodescript

@@ -1,6 +1,5 @@
 script "com.livecode.pi.customprops.behavior"
 local sPropSet, sHilitePath
-constant kWidgetHeight = 150
 
 on editorInitialize
    put empty into sPropSet
@@ -92,9 +91,10 @@ end editorUpdate
 constant kControlGap = 5
 constant kKeyFieldHeight = 21
 constant kLabelFieldHeight = 21
-constant kValueFieldHeight = 63
+constant kValueFieldHeight = 126
 constant kLabelSize = 50
 constant kSetButtonsHeight = 30
+constant kWidgetHeight = 150
 
 on editorResize
    lock screen
@@ -113,12 +113,15 @@ on editorResize
    set the lockLoc of group "Set buttons" of me to true
    send "groupResize kLabelSize, kControlGap" to group "Set buttons" of me
 
+   local tTopGroupHeight
+   put the bottom of group "background" into tTopGroupHeight
+   
    # Use all space not taken by other elements for main array display
-      local tWidgetHeight, tValueHeight
+   local tWidgetHeight, tValueHeight
    put kWidgetHeight into tWidgetHeight
-   put max (the height of this card - ( 12 * kControlGap + kLabelFieldHeight  \
+   put max(the height of this card - ( 6 * kControlGap + kLabelFieldHeight  \
          + kKeyFieldHeight + kValueFieldHeight + kSetButtonsHeight  \
-         + tWidgetHeight), kValueFieldHeight) into tValueHeight
+         + tWidgetHeight + tTopGroupHeight), 0) into tValueHeight
 
    set the height of widget 1 of me to tWidgetHeight
    set the width of widget 1 of me to the width of me

Toolset/palettes/script editor/behaviors/revsefindmaincardbehavior.livecodescript

@@ -33,7 +33,11 @@ end menuPick
 
 on closeCard
    historySave
-   send "revSEFindFinalize" to (getCaller())
+   local tCaller
+   put getCaller() into tCaller
+   if there is a stack tCaller then
+      send "revSEFindFinalize" to tCaller
+   end if
    pass closeCard
 end closeCard
 
@@ -133,7 +137,11 @@ command updateButtonStates
 end updateButtonStates
 
 private function getCaller
-   return the long id of the cCaller of the owner of me
+   if there is a stack (the cCaller of the owner of me) then
+      return the long id of the cCaller of the owner of me
+   else
+      return empty
+   end if
 end getCaller
 
 # Returns

Toolset/palettes/start center/revStartCenterBehavior.livecodescript

@@ -170,8 +170,8 @@ end socialMediaUnhiliteAll
 
 command recentFilesInitialise
    set the dgProps["hilite color"] of group "recentFiles" to uiColor("edition")
-   set the linkColor to uiColor("edition")
-   set the underlineLinks to false
+   set the linkColor of this stack to uiColor("edition")
+   set the underlineLinks of this stack to false
 end recentFilesInitialise
 
 command recentFilesSet

Toolset/palettes/tools/revtools.livecodescript

@@ -170,6 +170,7 @@ on generatePalette
    repeat while there is a group "contents"
       delete group "contents"
    end repeat
+   reset the templateGroup
    create group "contents"
 
    # Clear the error group

Toolset/resources/supporting_files/property_definitions/com.livecode.interface.classic.CurveGraphic.tsv

@@ -3,7 +3,8 @@ type	graphic tool
 title	Curve Graphic											
 
 -----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----
-name							Curve					
+name							Curve				
+label	
 tooltip												
 style							curve	rectangle,roundrect,line,oval,regular,line,curve,polygon				
 opaque							false					

Toolset/resources/supporting_files/property_definitions/com.livecode.interface.classic.LineGraphic.tsv

@@ -3,6 +3,7 @@ type	graphic tool
 
 -----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----
 name							Line					
+label
 tooltip												
 style							line	rectangle,roundrect,line,oval,regular,line,curve,polygon				
 opaque							false					

Toolset/resources/supporting_files/property_definitions/com.livecode.interface.classic.OvalGraphic.tsv

@@ -4,6 +4,7 @@ title	Oval Graphic
 
 -----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----	-----
 name							Oval					
+label
 tooltip												
 style							oval	rectangle,roundrect,line,oval,regular,line,curve,polygon				
 opaque							true