From: Tobias Oetiker <tobi@oetiker.ch>
Date: Thu, 2 Feb 2012 15:35:24 +0000 (+0000)
Subject: fix for tcl bindings ... -- George Ross
X-Git-Tag: 1.4.8~38
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2cbb285c19ec369db5eb1dcf584b09a1bd691ab6;p=thirdparty%2Frrdtool-1.x.git

fix for tcl bindings ... -- George Ross


git-svn-id: svn://svn.oetiker.ch/rrdtool/branches/1.4/program@2269 a5681a0c-68f1-0310-ab6d-d61299d08faa
---

diff --git a/bindings/tcl/tclrrd.c b/bindings/tcl/tclrrd.c
index a98a2d7c..869d6c78 100644
--- a/bindings/tcl/tclrrd.c
+++ b/bindings/tcl/tclrrd.c
@@ -678,7 +678,7 @@ static int init(
     if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL)
         return TCL_ERROR;
 
-    if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 1) == NULL) {
+    if (Tcl_PkgRequire(interp, "Tcl", TCL_VERSION, 0) == NULL) {
         return TCL_ERROR;
     }