livecode
diff --git a/Collapse file
‎tests/lcs/core/engine/_widgetthrow.lcb‎
Copy file name to clipboard
+7Lines changed: 7 additions & 0 deletions b/Collapse file
‎tests/lcs/core/engine/_widgetthrow.lcb‎
Copy file name to clipboard
+7Lines changed: 7 additions & 0 deletions
diff --git a/Collapse file
‎tests/lcs/core/engine/widget.livecodescript‎
Copy file name to clipboardExpand all lines: tests/lcs/core/engine/widget.livecodescript
+19Lines changed: 19 additions & 0 deletions b/Collapse file
‎tests/lcs/core/engine/widget.livecodescript‎
Copy file name to clipboardExpand all lines: tests/lcs/core/engine/widget.livecodescript
+19Lines changed: 19 additions & 0 deletions
@@ -0,0 +1,7 @@
+widget com.livecode.lcs_tests.core.widgetthrow
+
+public handler OnCreate() returns nothing
+	throw "error"
+end handler
+
+end widget
@@ -21,6 +21,7 @@ along with LiveCode.  If not see <http://www.gnu.org/licenses/>.  */
 on TestSetup
    TestLoadAuxillaryExtension "_widget"
    TestLoadAuxillaryExtension "_widget_support"
+   TestLoadAuxillaryExtension "_widgetthrow"
 end TestSetup
 
 //////////
@@ -80,3 +81,21 @@ end TestWidgetScriptObjectAccess
 on errorDialog pError
    put pError into gLastSentWidgetError
 end errorDialog
+
+//////////
+
+on TestWidgetThrowInOnCreate
+   set the lockErrorDialogs to true
+   create stack "WidgetThrowOnSaveTest"
+   set the defaultStack to "WidgetThrowOnSaveTest"
+
+   put empty into gLastSentWidgetError
+   
+   create widget "Test" as "com.livecode.lcs_tests.core.widgetthrow"
+
+   wait for 0 with messages
+
+   delete stack "WidgetThrowOnSaveTest"
+   TestAssert "error dialog when widget throws in OnCreate", \
+   	  gLastSentWidgetError is not empty
+end TestWidgetThrowInOnCreate