1 files changed, 0 insertions, 32 deletions
diff --git a/sci-chemistry/gopenmol/files/3.00-tcl8.6.patch b/sci-chemistry/gopenmol/files/3.00-tcl8.6.patch
deleted file mode 100644
index a4c3bce12468..000000000000
--- a/sci-chemistry/gopenmol/files/3.00-tcl8.6.patch
+++ /dev/null
@@ -1,32 +0,0 @@
- src/graphics/g_Mmain.c | 2 +-
- src/parser/p_parser.c  | 4 ++--
- 2 files changed, 3 insertions(+), 3 deletions(-)
-
-diff --git a/src/graphics/g_Mmain.c b/src/graphics/g_Mmain.c
-index b9bb340..f044568 100755
---- a/src/graphics/g_Mmain.c
-+++ b/src/graphics/g_Mmain.c
-@@ -487,7 +487,7 @@ int gomp_Mmain(int argc, const char *argv[])
-     {
-         Tcl_Interp  *interp;
-         interp = gomp_GetTclInterp();
--        sprintf(Temp,"'%s' problems creating the Tk window",interp->result);
-+        sprintf(Temp,"'%s' problems creating the Tk window",Tcl_GetStringResult(interp));
-         gomp_PrintERROR(Temp);
-         return(1);
-     }
-diff --git a/src/parser/p_parser.c b/src/parser/p_parser.c
-index c9fd8ce..62eb05c 100755
---- a/src/parser/p_parser.c
-+++ b/src/parser/p_parser.c
-@@ -809,8 +809,8 @@ int          gomp_TclRunScript()
-     if(value != (const char *)NULL) {
-         code = Tcl_EvalFile(interp , value);
-         if(code != TCL_OK) {
--            if(*interp->result != (char)NULL) {
--                gomp_PrintERROR(interp->result);
-+            if(*Tcl_GetStringResult(interp) != (char)NULL) {
-+                gomp_PrintERROR(Tcl_GetStringResult(interp));
-                 return(1);
-             }
-         }