FW: error exmh 2.8.0 04/21/2012

I'm not in a good position to look at the code behind this error (at a conference with spotty network connectivity).  Perhaps the jcl-beautify code has an old reference to lassign?

The best, long term solution is to convert to "lassign" as defined in Tcl 8.5, and if there is an earlier version of Tcl in use, just define an lassign that matches the 8.5 semantics and argument lists.

--
Brent


-----Original Message-----
From: Emile CARCAMO [mailto:[email protected]] 
Sent: Tuesday, April 24, 2012 9:52 AM
To: Welch, Brent
Subject: error exmh 2.8.0 04/21/2012

 Hi Brent,
As promised here is the stack trace I've got with the
exmh very first run I've did when trying out version 2.8.0
Regards,
-Emile


Tue Apr 24 18:52:14 CEST 2012
emile got an error
Exmh version 2.8.0 04/21/2012
TK version 8.5.11
TCL version 8.5.11
Linux satl755.wifi 3.3.2-8.fc17.i686.PAE #1 SMP Sat Apr 21 12:34:01 UTC 2012 i686 i686 i386 GNU/Linux

can't read "qt_cnt": no such variable
    while executing
"if {$qt_cnt >= 5} {
	    set qt_cnt 5
	}"
    (procedure "jcl-beautify" line 154)
    invoked from within
"jcl-beautify $exwin(mtext)"
    (procedure "Hook_MsgShow_Pretty" line 4)
    invoked from within
"$cmd $mhProfile(path)/$exmh(folder)/$msgid mimeHdr"
    ("foreach" body line 2)
    invoked from within
"foreach cmd [info commands Hook_MsgShow*] {
	    $cmd $mhProfile(path)/$exmh(folder)/$msgid mimeHdr
	}"
    invoked from within
"if [MsgShowInText $exwin(mtext) $mhProfile(path)/$exmh(folder)/$msgid] {
	MsgSeen $msgid
	if {!$mime(stop)} {
	    set msg(dpy) $msgid
	}
	set msg(cur..."
    (procedure "MsgShow" line 12)
    invoked from within
"MsgShow $msgid"
    (procedure "MsgChange" line 18)
    invoked from within
"MsgChange 5 show"
    invoked from within
"time [list MsgChange $msgid $show]"
    (procedure "Msg_Change" line 3)
    invoked from within
"Msg_Change $msg(id) $show"
    (procedure "Msg_Show" line 16)
    invoked from within
"Msg_Show cur"
    ("eval" body line 1)
    invoked from within
"eval $msgShowProc"
    (procedure "FolderChange" line 53)
    invoked from within
"FolderChange inbox {Msg_Show cur}"
    invoked from within
"time [list  FolderChange $folder $msgShowProc]"
    (procedure "Folder_Change" line 3)
    invoked from within
"Folder_Change $exmh(folder)"
    (procedure "Exmh" line 114)
    invoked from within
"Exmh"
    ("after" script)