poke: only wrap poke-gui with TCLLIBPATH

pkgs/applications/editors/poke/default.nix

@@ -5,10 +5,9 @@
 , help2man
 , pkg-config
 , texinfo
-, makeWrapper
 , boehmgc
 , readline
-, guiSupport ? false, tcl, tcllib, tk
+, guiSupport ? false, makeWrapper, tcl, tcllib, tk
 , miSupport ? true, json_c
 , nbdSupport ? !stdenv.isDarwin, libnbd
 , textStylingSupport ? true
@@ -75,6 +74,15 @@ in stdenv.mkDerivation rec {
     moveToOutput share/vim "$out"
   '';
 
+  postFixup = lib.optionalString guiSupport ''
+    wrapProgram "$out/bin/poke-gui" \
+      --prefix TCLLIBPATH ' ' "$TCLLIBPATH"
+
+    # Prevent tclPackageHook from auto-wrapping all binaries, we only
+    # need to wrap poke-gui
+    unset TCLLIBPATH
+  '';
+
   passthru = {
     updateScript = writeScript "update-poke" ''
       #!/usr/bin/env nix-shell