[MACTCL] Problem with loading tcl-script via AppleScript

[Svenn A. B. <sve...@bj...>]

Hi,
I use TextWrangler to edit tcl on my powerbook with OSX 10.3.9 and try 
to make this applescript work:

tell application "TextWrangler"
	set theFile to text of text window 1
end tell

tell application "Wish"
	activate
	do script theFile
end tell

Wish deliver an error message:
AEDoScriptHandler: invalid script type 'utxt', must be 'alis' or 'TEXT'

Maybe there is some conversion from one type of text to another type of 
text nescessary, but I have no idea where to look for more help. If I 
try to drop the Wish.app icon on the Script Editor.app icon in order to 
get the dictionary, I get the message that Wish does not support 
AppleScript scripting. Is that maybe my problem?

I found the AppleScript snippet above on the net, and then it must have 
worked once for somebody. Are there other versions of Wiish.app for 
MacOSX out there or could it be that this was for tcl/tk on MacOS 9. 
(The page didn't state)

Appreciate any help.
Svenn