Re: [Help-smalltalk] TCL/TK linking on Centos 5 to see browser

[Paolo Bonzini]

Stephen wrote:
> > Can you do this:
> >
> > tclsh
> > puts $tcl_library
>
> address@hidden ~]# tclsh
> % puts $tcl_library
> /usr/share/tcl8.4

Thanks.  The problem should be that /usr/lib/tcl8.4 does not exist, and 
so neither does /usr/lib/tcl8.4/.. (which is how the script tries to 
reach /usr/lib).

The following patch should work.

Paolo

--- orig/build-aux/tcltk.m4
+++ mod/build-aux/tcltk.m4
@@ -27,8 +27,10 @@ if test "x$with_tcl" = x || test "$with_
           test -f "$with_tcl/../../tclConfig.sh" && 
with_tcl="$with_tcl/../.." && break
           with_tcl=`echo "$with_tcl" | sed 's,\(.*\)/share,\1/lib,'`
           test -f "$with_tcl/tclConfig.sh" && break
-          test -f "$with_tcl/../tclConfig.sh" && 
with_tcl="$with_tcl/.." && break
-          test -f "$with_tcl/../../tclConfig.sh" && 
with_tcl="$with_tcl/../.." && break
+          with_tcl=`echo "$with_tcl" | sed 's,/[^/]*$,,'`
+          test -f "$with_tcl/tclConfig.sh" && break
+          with_tcl=`echo "$with_tcl" | sed 's,/[^/]*$,,'`
+          test -f "$with_tcl/tclConfig.sh" && break
         fi
        with_tcl=no
        TCLSH=no