[6541] in SIPB bug reports

home help back first fref pref prev next nref lref last post

error exmh 1.6.7 5/3/96

daemon@ATHENA.MIT.EDU (Jean Foster)
Thu Oct 23 10:30:52 1997

To: bug-sipb@MIT.EDU
Date: Thu, 23 Oct 1997 10:30:39 EDT
From: Jean Foster <jfoster@MIT.EDU>

 I tried to open for editing a file in the drafts folder and got the error:

Cannot open /afs/athena.mit.edu/user/j/f/jfoster/Mail/drafts/2


Thu Oct 23 10:30:38 EDT 1997
jfoster got an error
Exmh version 1.6.7 5/3/96
TK version 4.1
TCL version 7.5
SunOS arizona 5.5.1 Generic_103640-12 sun4m sparc SUNW,SPARCstation-5

bad text index "header"
    while executing
"$t insert header "\nMime-Version: 1.0""
    (procedure "SeditMimeFirstPart" line 23)
    invoked from within
"SeditMimeFirstPart $t $type $promote $keep"
    invoked from within
"return [SeditMimeFirstPart $t $type $promote $keep]..."
    invoked from within
"if {! $sedit($t,mime)} {
	#
	# No type information yet.
	#
	if {$promote} {
	    set keep 1		;# Keep existing body
	} else {
	    SeditBodyDialog $t $ ..."
    (procedure "SeditMimeType" line 12)
    invoked from within
"SeditMimeType text/plain promote"
    (procedure "SeditInitMimeType" line 23)
    invoked from within
"SeditInitMimeType $draft $t"
    invoked from within
"if {$sedit(iso)} {
	SeditInitMimeType $draft $t
    }"
    (procedure "Sedit_Start" line 158)
    invoked from within
"Sedit_Start $draft"
    ("sedit" arm line 2)
    invoked from within
"switch -glob -- $editor($type) {
	*mxedit* {
	    if ![info exists exmh(editInterp)] {
		set exmh(editInterp) "mxedit"
	    }
	    if ![info exists ex ..."
    (procedure "EditStart" line 7)
    invoked from within
"EditStart $msg(path) $edittype"
    invoked from within
"if [regsub {^([ 	]*)exmh-async(.*)$} $editor($edittype) {\2} newprog] {
	set cmd [split [join [string trimright $newprog "& \t"]]]
	Exmh_Status "Start ..."
    (procedure "Msg_Edit" line 16)
    invoked from within
"Msg_Edit"
    invoked from within
".mid.right.bot.more.m invoke active"
    ("uplevel" body line 1)
    invoked from within
"uplevel #0 [list $w invoke active]"
    invoked from within
"if {[$w type active] == "cascade"} {
	$w postcascade active
	set menu [$w entrycget active -menu]
	tkMenuFirstEntry $menu
    } elseif {[$w type activ ..."
    (procedure "tkMenuInvoke" line 14)
    invoked from within
"tkMenuInvoke .mid.right.bot.more.m 1"
    (command bound to event)

home help back first fref pref prev next nref lref last post