[Tb] Applescripting Tinderbox

I'm trying to write an Applescript that will save all of the open TB
documents. I've tried several variations of the following

-- Save every open Tinderbox document
tell application "Tinderbox"
        repeat with index from 1 to count of documents
                set doc to document [index]
                save doc
        end repeat
end tell

but they get errors like "Tinderbox got an error. Can't get document
[1]."

I can however, save a document if I know its name (e.g. save document
"projects")

Help?!

-- 
Gary Warren King
metabang.com
http://www.metabang.com/
-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/pkcs7-signature
Size: 2367 bytes
Desc: not available
Url : http://metamere.org/pipermail/tb/attachments/20050411/278a61a6/smime.bin