tcl.tclRequiresCheckHook: refer to tclsh by absolute path (#527901)

pkgs/development/interpreters/tcl/generic.nix

@@ -225,6 +225,7 @@ stdenv.mkDerivation (finalAttrs: {
           name = "tcl-requires-check-hook";
           substitutions = {
             tcl_hook = ./tcl-requires-check-hook.tcl;
+            tclsh = lib.getExe finalAttrs.finalPackage;
           };
           meta = {
             inherit (finalAttrs.meta) maintainers platforms;

pkgs/development/interpreters/tcl/tcl-requires-check-hook.sh

@@ -7,7 +7,7 @@ tclRequiresCheckPhase () {
     if [ -n "$tclRequiresCheck" ]; then
         export TCLLIBPATH="$out/lib $TCLLIBPATH" # Redundant if tcl-package-hook is also used
         # FIXME: For some reason the output gets swallowed unless we pipe it through cat‽
-        tclsh @tcl_hook@ 2>&1 | cat
+        @tclsh@ @tcl_hook@ 2>&1 | cat
     fi
 }
 

pkgs/development/tcl-modules/by-name/rl/rl_json/package.nix

@@ -27,6 +27,7 @@ stdenv.mkDerivation (finalAttrs: {
   nativeBuildInputs = [
     autoreconfHook
     tcl.tclPackageHook
+    tcl.tclRequiresCheckHook
     pandoc
   ];
 
@@ -39,6 +40,8 @@ stdenv.mkDerivation (finalAttrs: {
 
   doCheck = true;
 
+  tclRequiresCheck = [ "rl_json" ];
+
   meta = {
     homepage = "https://github.com/RubyLane/rl_json";
     description = "Tcl extension for fast json manipulation";