strange error on send

I'm running the cvs version from 07/26/2004 and when I tried to send
one message, I received the following error message.  send worked for
previous messages and later one.

Just a point of information

Jim

Wed Jul 28 16:27:58 EST 2004
jwb got an error
Exmh version 2.7.1 07/26/2004
TK version 8.4.3
TCL version 8.4.6
SunOS hera 5.8 Generic_117000-03 sun4u sparc SUNW,Sun-Fire-880

can't read "exmh(1,action)": no such element in array
    while executing
"Exmh_Debug SeditSend id=$id action=$exmh($id,action)"
    (procedure "SeditSendCommon" line 6)
    invoked from within
"SeditSendCommon $draft $t $post"
    (procedure "SeditSend" line 13)
    invoked from within
"SeditSend {/home/jwb/Mail/drafts/1} {.sedit1.f.t} 0"
    invoked from within
".sedit1.but.send invoke"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list $w invoke]"
    (procedure "tk::ButtonUp" line 22)
    invoked from within
"tk::ButtonUp .sedit1.but.send"
    (command bound to event)