--- tcldoc.tcl.orig	2004-11-05 10:36:48.000000000 -0700
+++ tcldoc.tcl	2019-02-05 03:50:04.000000000 -0700
@@ -1,4 +1,4 @@
-#!/usr/bin/tclsh
+#!__MACPORTS_PREFIX__/bin/tclsh
 # $Id: tcldoc.tcl,v 1.2 2004/11/05 17:36:48 tang Exp $
 
 #//#