1 files changed, 16 insertions, 0 deletions
diff --git a/dev-tcltk/tdom/files/tdom-0.8.3-tcl8.6.patch b/dev-tcltk/tdom/files/tdom-0.8.3-tcl8.6.patch
new file mode 100644
index 000000000000..94bfa22d06e2
--- /dev/null
+++ b/dev-tcltk/tdom/files/tdom-0.8.3-tcl8.6.patch
@@ -0,0 +1,16 @@
+ generic/tcldom.c | 2 +-
+ 1 file changed, 1 insertion(+), 1 deletion(-)
+
+diff --git a/generic/tcldom.c b/generic/tcldom.c
+index 91d98c9..ae6d413 100644
+--- a/generic/tcldom.c
++++ b/generic/tcldom.c
+@@ -5934,7 +5934,7 @@ int tcldom_EvalLocked (
+     if (ret == TCL_ERROR) {
+         char msg[64 + TCL_INTEGER_SPACE];
+         sprintf(msg, "\n    (\"%s %s\" body line %d)", Tcl_GetString(objv[0]),
+-                Tcl_GetString(objv[1]), interp->errorLine);
++                Tcl_GetString(objv[1]), TCL_GetErrorLine(interp));
+         Tcl_AddErrorInfo(interp, msg);
+     }
+