tk/More-general-error-message-since-it-can-be-raised-no.patch
2019-09-30 11:18:32 -04:00

27 lines
1001 B
Diff

From eabf7dee83847addd7293f223b8604abe6adc485 Mon Sep 17 00:00:00 2001
From: fvogel <fvogelnew1@free.fr>
Date: Fri, 24 Aug 2018 21:47:21 +0000
Subject: [PATCH 295/693] More general error message, since it can be raised
not only because of an empty -children option value
---
generic/ttk/ttkLayout.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/generic/ttk/ttkLayout.c b/generic/ttk/ttkLayout.c
index 924355aa6..1bad8c7a8 100644
--- a/generic/ttk/ttkLayout.c
+++ b/generic/ttk/ttkLayout.c
@@ -702,7 +702,7 @@ Ttk_LayoutTemplate Ttk_ParseLayoutTemplate(Tcl_Interp *interp, Tcl_Obj *objPtr)
if (childSpec) {
tail->child = Ttk_ParseLayoutTemplate(interp, childSpec);
if (!tail->child) {
- Tcl_SetObjResult(interp, Tcl_ObjPrintf("Empty -children value"));
+ Tcl_SetObjResult(interp, Tcl_ObjPrintf("Invalid -children value"));
Tcl_SetErrorCode(interp, "TTK", "VALUE", "LAYOUT", NULL);
goto error;
}
--
2.19.1