--- tDOM-0.8.3//generic/dom.h.orig	2013-07-16 16:49:32.000000000 -0400
+++ tDOM-0.8.3//generic/dom.h	2013-07-16 16:50:41.000000000 -0400
@@ -94,6 +94,14 @@
 #endif
 
 /*
+ * Beginning with 8.6, interp->errorLine isn't public visible anymore
+ * (TIP 330)
+ */
+#if (TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION < 6)
+# define Tcl_GetErrorLine(interp) (interp)->errorLine
+#endif
+
+/*
  * Starting with Tcl 8.2 the Tcl_Panic() is defined properly
  * over the stubs table.
  * Also, we have a proper Tcl_GetString() shortcut afterwards.
--- tDOM-0.8.3//generic/tcldom.c.orig	2013-07-16 16:44:59.000000000 -0400
+++ tDOM-0.8.3//generic/tcldom.c	2013-07-16 16:51:58.000000000 -0400
@@ -5934,7 +5934,7 @@
     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);
     }
 
--- tDOM-0.8.3/Makefile.in.orig	2013-07-17 08:56:12.000000000 -0400
+++ tDOM-0.8.3/Makefile.in	2013-07-17 08:57:44.000000000 -0400
@@ -306,7 +306,7 @@
 #========================================================================
 
 pkgIndex.tcl-hand:
-	@(echo 'package ifneeded $(PACKAGE_NAME) $(PACKAGE_VERSION)\
+	@(echo 'package ifneeded $(PACKAGE_NAME) $(PACKAGE_VERSION) \
 	"load [list [file join $$dir $(PKG_LIB_FILE)]];\
          source [list [file join $$dir tdom.tcl]]"'\
 	) > pkgIndex.tcl