[5495] in SIPB bug reports
error exmh 1.6.1 5/23/95
daemon@ATHENA.MIT.EDU (meeroh@MIT.EDU)
Sat Sep 9 16:53:53 1995
To: bug-sipb@MIT.EDU
Date: Sat, 09 Sep 1995 16:53:30 EDT
From: - <meeroh@MIT.EDU>
Sat Sep 9 16:53:30 EDT 1995
meeroh got an error
Exmh version 1.6.1 5/23/95
TK version 3.6
TCL version 7.3
SunOS w20-575-21 5.3 Generic_Patch sun4m sparc
cancel
while executing
"error "cancel""
invoked from within
"if {$keybox(state) == "cancel"} {
error "cancel"
}"
(procedure "Pgp_KeyBox" line 60)
invoked from within
"Pgp_KeyBox "Please select the key to use for signing" $pgp(secring) $pgp(privatekeys)"
invoked from within
"set signkeys [Pgp_KeyBox "Please select the key to use for signing" $pgp(secring) $pgp(privatekeys)]..."
("while" body line 2)
invoked from within
"while {[llength $signkeys] != 1} {
set signkeys [Pgp_KeyBox "Please select the key to use for signing" $pgp(secring) $pgp(privatekeys)]
}"
invoked from within
"if {$pgp(choosekey) && [llength $pgp(privatekeys)] > 1} {
set signkeys {}
while {[llength $signkeys] != 1} {
set signkeys [Pgp_KeyBox "Ple ..."
invoked from within
"if [regexp {sign} $action] {
if {$pgp(choosekey) && [llength $pgp(privatekeys)] > 1} {
set signkeys {}
while {[llength $signkeys] != 1} { ..."
(procedure "Pgp_SeditEncrypt" line 35)
invoked from within
"Pgp_SeditEncrypt signbinary /afs/athena.mit.edu/user/m/e/meeroh/Mail/drafts/1 .sedit1.f.t"
invoked from within
"$menu invoke $i"
invoked from within
"if {$i != "none"} {
tk_mbUnpost
update idletasks
$menu invoke $i
}"
(procedure "tk_invokeMenu" line 3)
invoked from within
"tk_invokeMenu .sedit1.but.pgp.m"
(command bound to event)
